LIST 4; 
LNON; 
TITLE * SAM 68K MONITOR VERSION 2.3°3 
MONVER: EQU.L 7¥2.3'5 


/EEEEEEEREEESEEEEEEEESES TEST EE EE ESE EELS EL ERESPEEEEEESEEEEELISES 
MONITOR-PROGRAMM FUER SAN 48K YERSION 2.3 13/05/85 


i 
: 

t COPYRIGHT 1985 

t BY 

t KWS COMPUTERSYSTEME GabH 

t ETTLINGEN 

t W. GERMANY 

SEEPEEEEEEE EERE EEE E EEE EEE ETE EEEEEEEEEE EEE EEE EEE EEE EEE 


a. i. ee | 


PAGE 48; 
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ve 
33 | RAN USED BY NONITOR 
34 ' EDITOR 
35 ! ASSEMBLER 
Jb !  MDCR 
37 ' VIDEO 
Ja 
39 
4A BASE 3$500-8; ' VIDEQTREIBER VARIABLEN 
: 4F§ VARIABLES: 05.8 8; 
é 
43 BASE 3$580; 
aa 
45 MOCREUFFER: 
46 508 | 05.8 $44) | $5H0-#543 USED BY DCR 
7 544 STEPFLG: O5.8 13! COM: SINGLE STEP 
48346 TOFLAS: DS.L £3! 15 USED FOR IN OUT BRB1aeR1 STANDART 
494A LASTIQ: OG.L {;! HERE [5 THE LAST I/O CONFIGURATION 
SB O4E SERRTES: OS.L 43! THIS iS END OF AUTOVERTORI-SEVICER, 
Mo 2 BS.L 45 
52956 INTINPUT?OS.2 13! HERE 1S LAST INPUT CHARACTER FROM ACIAI 
aa? “at 05.2 t3! TD CHAR, 
4558 RESFLAG: OS.L {3 
5s ee | REGS: 5.0 155 
36 398 SSTP: MS.L 44 
37390 USTPs = OG.L 45) USER STACKPOINTER 
S8 SAB 05.4 ty 
39° SA2 STRG: DG. ty! STATUSRESISTER 
6B SA4 PCRS: DSL fy! PROGRAM-COUNTER 
bt 38 BPRE: = 0S.L 83! QREAKPOINT LIST 
2 xX DS.i 8)! SAVES OPCODES 
63 SES EWORKEND?0S.L 13! EDITOR WORK BUFFER END 
64 = SEC ENDKEMNU: 05. 45! END OF FILE KERRUNG TO BE SEND (STAND. 24) 
65 SEE YSEROUT: OS.W iy! HERE STANOS OPCQ JAP 
b6 SFB OS.L 13! AND HERE ye VECTOR 10 JUMP 
hb? SF 4 USERIN: 05. uy HERE PCO JAP 
68 = SF4 DS.L t;' AND THE YECTOR 
69 SFA TERATAB: OS. (3! POINTER TQ SCREEN-ED! TABEL 
78 7 
if 
2 
73 | 
14 '$ POINTER ASSEMBLER WORKSPACE 
i ORE Cc ASSWBEG: DS.L 15! START OF ASSEBLER WORK 
76 682 ASSWEND: OS.L 13! END OF ASSEMBLER WORK 
1 
78 't PATCH TO ASSEMBLER # 
19 
88 = 686 XINITS: OS.L 1} 
8{ =. 6BA XGETAN: DS.L 43 
82 OBE XGETLI: DS.L 13 
8312 XOUTOB: OS.L 1; 
84 = 16 XMOVEO: DS.L 1} 
85 
86 
87 
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89 '# WORK SPACE OF LINE-EDITOR 

98 

OTA POINTACT: OS.L £3! ACT, LINE-POINTER 

92 BIE ENOKENN: = DS.W 4} 

93 628 COMBUFFS = S.W 453'MAX. 98 BYTES 

94 GTA COMEND: = 0S.W f3! COMMANDLINE BUFFER EDL + MONITOR 
9 67 DUMMY: = OS.W 43 

96 = B7E BUFFER: = S.W f3! START OF EDITOR BUFFER (--)EWORKEND! 
97 

98 

99 

186 AND NOW SOME EQUATES 

181 

182 VIDEORAMN: EQU 9838800; = ' START OF NORMAL Y.-RAM 
183 VIDECRANY: EQU a$F18080; | ALTERNATE VIDEO RAM 

164 VIDEDRAM2: EQU a$78808; © ' ALTERNATE VIDEO +254 KB 
165 VIDEQRAMS: EU $88000; = ' ALTERNATE VIDEO +542 KB 
184 ASSEMBLE: E4U a$@Q1Q4EBa; 

187 EDITOR: EQU a$88187480; 

188 DEFASSB: © EQU $4800; 

189 DEFASSE: © E@U $7FFE; 

118 ACTAICD: = EGU a$FFFFSC85; /# CHANNEL A CONTROL #/ 
{{1 ACTAGDA: == EQU a$FFFF8COL; /# CHANNEL A DATA #/ 

112 ACIAZCO: © EQU aSFFFFECB7; /# CHANNEL B CONTROL #/ 
113 ACIAZDA: == EQU a$FFFF8CA3; /# CHANNEL B DATA #/ 

114 VIABASEMDCR:EQU $FFFF&8Q3; 

115 VIAPBDAT: EQU aSFFFFR8O1; 

116 VIAPBDIR: E40 a$FFFF88A5; 

11? VIAPPCR: = EQU a¢FFFF8819; 

118 CRTADR: EQU a$FFFFSAUI; 

119 CRIREG: EQU a$FFFFRAB3; 

12 PIADRA: EQU asFFFFE99{; 

fa PIACRA: EQU a$FFFF89@3; 

122 PIADRB: EQU a$FFFF8995; 

123 PIACRB: EQU a$FFFF 8987; 

124 TRACEV(T: © EQU a$24; 

{2 BREVCT: E@U a$B8;! TRAP 14 15 BREAKPOINT HANDLER 
ie TRAPGVECTOR:EGU 9$88;' END OF PROGRAM WITH REG.-DUNP 
12 TRAPIYECTORSEQU $84; 

128 BUSERRORV: QU 9$8; 

129 TRAPIO: EQU a$8C;! TRAP 15 IS FOR 1/0 

138 AUTOV: EGU 38403! AUTOVECTOR LEVEL 3 FOR ACIAL INPUT 
131 MONST: EQU $4E83! MONITOR STACK (MAY 1/4 KB) 

132 VESTACK: QU $4083! DEFAULT USERSTACK (' IN YECTORTABEL 1) 
{33 STANDIO: = EGU $1881; /STANDARD IS CHANAL #8 (ACIAM} 
134 ENOSTAN: = EQU $8484;! STANDARD END OF FILE 

135 DEFWORK: = EGU S$37FF3! DEFAULT EDITOR WORKENO {LINE-ED1) 
134 QPCOJAP: = EGU $4EF93! OPCODE JUMP 

1]? 

13 

139 

148 | FIRST BYTES INEPRON: 

14! 

142 

143 

144 ORG $FEG888; 

145 | 
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146 
147 FERRRE 
148 FERAR4 
149 
158 
154 
152 
457 


158 
13° FERS 
(57 FEARS 
158 FERGIE 
(59 FERRIS 
{68 FEQAt. 
11 FEQG2B 
162 FEBE24 
(3 FEQG28 
144 FEAADC 
165 FEAAI2 
{bb FEAG34 
(67 
168 
169 
{78 FEGAI8 
(78 FEBOTA 
u a FERRIC 
7 FEORGA 
(79 FEARED 
(71 FE@REA 
(7! FEBQSS 
(71 FEQQ4S 
171 FEGB4A 
174 FEABSC 
171 FEBOEE 
{72 
(73 FEBQSS 
{74 
175 
{7 FEGGS4 
(77 FEG8S8 
{78 FE@R5C 
(79 FE@G68 
(88 FEGBG4 
(81 FEG@48 
{82 FEAGAC 
(83 FEGQ7A 
184 FEQG74 
185 
{86 
(87 FEBQ7A 
(88 FERS 
189 FEGQ82 
198 
191 
(92 FE@OBG 


kvs 


gaen2409 
ABFERE IE 


pies 


OU. 


sAa096C 
bABRAAIS 
b8A88520 
bBRBRBAR 
ARGALBAE 
anenassé 

baae81 44 


4E71 
sev t 
4E7t 
4E7 4 
47! 
4571 
4E7t 
AE? 
4E 71 
474 
4671 
AET! 


8088296 


b1{ 888150 
b1G808E4 
61 AGBGAE 
G1 GG1F CE 
61280994 
ABFAL37 
61888468 


PET CRRARAAES 


4 OF (2288 


83860028981 


6684 
68881544 


2{FCGFEGI24 
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DCL $408; 
DC.L #STARTREY; 


' JUAPTABEL OF MONITOR 


YINCH: 
YOUTCH: 
YIOFLAG: 
XPCRLF: 
(ARM: 
YCOLE: 
YPDATAS 
YHLOOP: 
SAVE: 
YLOA0: . 
YINTINP: 


YSETSYSC: 


STARTHE!: 


COLOSTRT: 


BRA. 
BRA. 
HCL 


4 
2 


wT 
HIOFLAGs 


BRA.W PCRLES 
BRA.W WARRST | 
BRA. COLDSTRT; 
BRA.W PDATA; 
BRA.W ALOOP; 
BRA. SAVEMDSE; 
BRA.W ROLGADS; 
OC.L  BINTINPUT; 
BRA. GETSYSC; 


ISTACK 
'POWER ON STARTYECTOR 


INPUT QNE CHAR. IN 68.8 

QUIPUT ONE CHAR. IN 09.8 

POINTER TO I0FLAS IN RAN 

PRINT CARRIAGE-RETURN+LINEFEED (+64NULL} 
BACK TQ AONITOR 

TO MONITOR AT COLDENTRY 

IS 70 LIST FROM {A5) TILL $84 COMES UP 

! DIRECT RETURN iN ALOOP 


a ee ee ee ee a er) 


' EG. IF NO INPUT ELSE =ASCII.B 
' SYSTER EQUATES AT (AQ)... 


NOP; HOPS NOP; NOP} HOPS NGPs 


NOP; 


BRA.W INIGRAM; 


BSR 
BSR 
BSR 
BSR 
BSR 
LEA.L 
BSR 


SETYERKTORS 5 
IRIACTAS; 
INIPIAS; 
INITCRT; 
PCRLFS 
TRES.A5; 
PDATA; 


MOVE.L MONSTA74 
MOVE.W $2288, SR 


NOP; NOPS NOP; NOP: NOP; 


| RETURN ON BUSERROR TO COLCSTRT 


' HINTEN BEI VIDEQTREIBERNS 
' MESSAGE 


' SET STATUS REGISTER 


| YORLAVEFIG AUTOBOOT YERSUCH 
BTST.B 2,PIADRA; 


WARKST: 


BRE 


WARAST 


BRA.W STARTBOOT; 


MOVE.L $TRACEIN,TRACEVCT;! SET TRACE VECTOR 


ae 
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193 FE@Q8E 
174 FEGB9S 


195 FERGIE 
196 FEGGA4 


{97 FE@BAC 


198 FEGQB4 
199 FEG@BA 


28t 
282 FEBACS 
203 FEGACA 
264 FEGRDE 
265 FE@AD2 
28h FEGQDS 
207 FEGBDA 
208 FEGQDE 
289 FEAGE2 
218 FEGRES 
2if 
212 
243 
214 
2{5 
215 FEAGES 
217 FEQGEC 
218 FEAGFE 
219 FE@OF2 
228 FEGOF4 
221 FE@GFS 
222 FEBOFA 
223 FEGOFE 
224 FEAL92 
225 FERIB4 
26 FEBLBA 


2st 
232 FEGLAC 
253 FEBL{2 
254 FEGL{8 
235 FEQLIE 
236 FEG124 
237 
238 FE@I2A 
239 FEG138 
249 
241 FEGL36 
242 FE@IIC 
243 


ks 


286 FEBBC2 


8824 
21FCOAFEQSCE 
B8BC 
2{FCBBFEA2C2 
8084 
2E7C888804E8 
21F COBFESI&2 
8OB8 
217080081808 
9544 

SIF C22B885A2 
2iF COBGG8480 
8598 

46F C2208 


61988932 
2E7CORRO84E8 
782A 
61888560 
61900418 
b78G81EC 
51888914 
61900468 
b8DE 


43FAGHAC 
21098888 
9108 
2808 
b6FC 
§3FAFFSC 
21098808 
J87C888A 
1618 
DiFCaG840888 
bBF 6 


117088088983 
117088088907 
11FC8883898! 
{1F 088888985 
11F 088348983 


11FC@8858987 
11F 088038981 


11FC8GGE8819 
4£75 


MLOOP: 
MLOQP{: 


MLOOPS: 


INIDRAM: 


LO: 
AL: 


H2: 
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MOVE.L STRAP{SHA,TRAPIO; ! SET TRAPI/O-HANDLER 
MOVE.L #TRAPLHA, TRAPIVECTORS 


HOVE.L HONST,A7; 
MOVE.L #BREAKIN,BRKYCT; | SET BREAK VECTOR 
MOVE.L $1808, PCRG; ! DEFAULT PC 


MOVE.W $2288, STAG; 
NOVE.L UGSTACK ,SSTPS 


! DEFAULT SR 
! DEFAULT S5 
ROVE.W $2286, 5R5 ! SET STATUS REGISTER 
BSR PCRLF; 

MOVE.L MONST,A7; 

MOVES.L *#’ DB; 


BSR QUTCH; ! PRINT PROMPT 


BSR INLINES ' GET LINE 

BEQ.W DECODES ' DECODE NO ERROR 
BSR PCRLF; 

BSR WHATS ' PRINT "WHAT?" 
BRA MLOOP; ' IF ERROR 


LEAL MiyAl; 

MOVE.L Ai ,BUSERRORV; 
SUB.L AB,AQ; 

MOVE.L (AG), (AG) +; 
BRA LO; 

LEA.L COLDSTRT Ai; 
NOVE.L Af ,BUSERRORV; 
HOVE. W 18,485 

ROVE.B (AB) DB; 
ADD.L $40968, Aa; 

BRA 423 


INITIALIZE THE PIA REGISTERS 


INIPIAS: 


MOVE.B @,PIACRA; =! CLEAR DDRA ACCESS BIT 
MOVE.B 8, PIACRB; 

MOVE.B $3,PIADRA; | ONLY PAG#{ ARE OUTPUTS 
NOVE.B G,PIADRB; =! PB ALL INPUTS 


MOVE.B $34,PIACRA; ! SET DATA ACCESS BIT, FDC INT DISABLED 


! WHEN CA2 LOW 


MOVE.B S,PIACRB; =! INTERRUPT ENABLED FUER TAST | 


NOVE.B J,PIADRA; | PAG+{ SHOULD BE HIGH 
NOVE.B SE,VIAPPCRS ' INIT BELL 


RTS§ 


13.85.85 kvs Diskassembler Page: 4 SAM 48K MONITOR VERSION 2.3 


244 

245 

246 

+t ! INITIALIZE THE APS¢ 

249 FEBIJE © 48E7BACA INTACIAS: MOVEN.L AQ-AL,-{A7); 

258 FEAL42 «= 44FRRCIS LEAL ACIAICO, AG; 

251 FERL46 «= 43FA2828 LEAL CHAINITAB Ai; 

252 FEBL4A = SCL LB BFF INILGQP: CHPILB $FF, iat): 

253 FEBI4E = 4786 BEG INICHE: 

234 FEAISA =| «1879 NOVE.E (Ai}+,{AB)) | ARITE REGISTER POINTER 
295 FEBIS2 = 199 MOVE.B (AL) +,(AB): | WRITE REGISTER 
236 FEBLS4 = OF 4 BRA IRILOOP; 

257 FEA{S6 «= 44F 88097 INICHB: = LEAL ACTAZS0. AG; 

258 FERISA = 4SFARB2A LEAL CHBINITAB Ai; 

259 FEQISE = ACL LAFF INILOOPS: CMPE.B $FF,iAd); 

268 FEBLb2 = 674 BEQ INIRET: 

2of FEALG4 §=§=— 1899 MOVE.B fA) +, (AQ); 

zb2 FEGL66 §8=— 1899 , —AQVE.B GAL) +, (AB) 5 

263 FEALG8 = GBF 4 BRA INILOOPB; 

264 FEALGA 86 4CDF A388 INIRET: «= MOVEM.L (A7)+,AB-AL; 

265 FEG{6E == 4E75 RTS; 

26 

26? 

268 

269 CHAINI TAB: 

278 FEAL7B «= BALE OCW $2818; | MASTER RESET 

zit FEAL?2 «= A444 OCW $8444; |} CLK/ Lh, 1 STOP, NO PARITY 
272 FERi74 = QSEA OC. $B5EAs | TY ENABLE, § BITS, 875 

273 FEGI74 «= -BSE! OC.W $Q3Ei; | AX EWABLE, 8 BITS, AUTO ENABLE 
274 FE@L78 = 284 OCW $8284; | NON YECTORED, HO OMA 

ZT FEGI7A = B118 OC.W $A118; ' AX INT ENABLED 

276 FEAI7C = 488 DC.W $8688; ' SYNC BYTES NOT NEEDED HERE 
277 FE@I7E =: 788 OCW $788; 

278 FEG18G = 8832 OC.W $8830; ' ERROR RESET 

279 FEGi82 «= BBB OC. 8 $80C8; | TX UNDERRUN DISCARDED 

288 FEGLG4 = -FFFF OC.W SFFFF; ' END OF TABLE 

281 

282 CHBINITAB: 

283 FE@186 «= B18 DCW $8818; 

284 FEGI86 = 444 OC. HW $8444; 

285 FE@L8A = 858 OC.W $8568; | RTS HIGH 

286 FE@{&C = ASE! O¢.a $A3E1; 

287 FERIBE. ©8288 OCW $8208; ' INTERRUPT VECTOR, USED BY SOFTWARE ONLY 
288 FEBI98 = 8184 OC.W $8184; | INTERRUPTS DISABLED, VECTOR AFFECTED 
289 FEBI92 «= 8488 OCW $8608; 

278 FEB194 = 788 OC.W $8788; 

291 FEBI96 §=—- B38 OCW $8858; 

292 FERI98 «= BCE DCW $H8C8; 

293 FERI9A =—-FFFF OCW SFFFF; 

294 

295 FERI9C «= S1FABRE4 GETSYSC: LEA.L SYSCONST AB; 

296 FEIA® = 4E75 RTS; 

297 

298 FEGIA2 © 36522E33 SYSCONST:0C.L © #HONVERS 

299 FEBLAG = BBFE2548 OC.L  #CHARS; 


308 FEGIAA © BBBRBAFE DC.L #¥ARTABLES; 


_ 


—— = en 
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581 FEGLAE 
582 FEBIB8 
303 FEQIB2 
584 FEBIRS 
385 FEGIBA 
386 FEGIBE 
387 

388 

389 

J18 FEGiC2 
J11 FEGIC8 
Ji2 FEGICA 
Ji3 FEGICE 
S14 FE@{GA 
Jt5 FeaiD4 


316 FEGIDC 
Ji7 FEGtE4 
318 FEGIEC 
Ji9 FEGIF4 
528 FEGIFC 
321 FEQzZ84 
d22 FEQ2AC 
323 FEazL4 
524 FER2IC 
25 FEQ224 
526 FEG22¢ 
527 FEG234 
328 FEG23¢ 
329 FEQ244 
338 
S31 FEG24¢ 
S32 FE@252 
333 FE@25A 


334 FEG262 
335 FEG268 


336 FEG27@ 
337 FEG274 
538 FEQ278 
339 FEG27E 


kyvs 


9268 
2188 
FFFFFFFF 
FFFFFFFF 
FFFFFFFF 
FFFFFFFF 


2B3CGRFEL29C 
9309 
J2C88FF 
2208 
SLCOFFFC 
21FCQAFELI&A 
808 

ZF CRRFEL20A 
REAL 
2{FCB2FEL2EA 
He1@ 

2iF CORFE ZEA 
9828 
2{FCRBFES ZEA 
Ba2e 
2{FCBBFEL2F2 
AaL4 

cL FCOGFEL2FA 
Agia 
2{FCBGFE 1382 
BA28 

ZF CORFELSIA 
He7e 
21FCBRFE L808 
8678 
2{FCBAFEA7C4 
BB4C 

21F CBBFEGI24 
8888 
2{FCQBFERI24 
8824 
2{FCBRFEASCE 
BGBC 
21FCBOFEGIB2 
8888 


JiFC88010544 
2{F CFFFFFFFF 
8558 

21F C8881 8804 
A546 
SLFCS4B485EC 
21F C8081 G88! 
Q54A 
43FRQ5EE 
S2FC4EF9 

22F COBFEGSC3 
S2F CHEF? 
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Od S312} 
OC.d = 256; 
OC.L  -f3 
1 ae © 
OC.L. 1} 
ef 
SETVERTORS: 


COLDSTI: 


MOVE.L #TRAPERR, 08; 
SUBA.L AL,AL; 
ROVE.W SFF Ot; 
MOVE.L 08, (AL) +; 
DBF Di, COLDSTI; 
MOVE.L #BUSERR, $8; 


' CLEAR Af 
' 256 VECTORS 


MOVE.L SADDRESSE,a$C; 
NOVEL SILLINSTR a$18} 
MOVE.L BILLINSTR, 3628; 
HOVE.L #ILLINSTR,a$2¢} 
MOVE.L #ZERODIVE 38145 
MOVE.L #0UTOFRAN, $18; 
MOVE.L #PRIVILEG 3828; 
MOVE.L ENNIABO,GS7C; 9 | PANIKBUTTOM 

MOVE.L #INTSERVICE ,a$78; ' FLOPPY INTERRUPT 
MOVE.L #SERVICES,AUTOVS; 

MOVE.L #TRACEIN, TRAPBYECTOR; 

MOVE.L $TRACEIN, TRACEVCT;! SET TRACE VECTOR 
MOVE.L @TRAPLSHA,TRAPIO; ' SET TRAPI/O-HANDLER 


MOVE.L #BREAKIN,BRKVCT; ! SET BREAK VECTOR 


MOVE.W 1 ,STEPFLG; 
MOVE.L -{,REGFLAG; 


NOVE.L STANDIO,IOFLAG}! SET IN QUT TO ACIA! 


MOVE. W ENDSTAN, ENDKENNU; 
MOVE.L STANDIO,LASTIO; 


LEA.L USERQUT Al; 

NOVE.W OPCOJMP, (AL) +; 
MOVE.L BOUTAL, (AL) +3 
MOVE. W OPCOJAP, (Ai) +5 
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548 FER282 
341 FEG288 


Z2BCQOFER7IC 
2IFC4E734E73 
a54E 
42748556 

21 FCRRRAITFF 
a5E8 

ot FCRRRB4HAA 
ASFE 

21 FCRGH87FFE 


MOVE.L BINAL, (AY); | DAMIT IST USERL/Q AUF ACIAL 
MOVE.L S$4E734E73,SERRTES;! LOCATED IN RAM 8 BYTES LONG 


342 FEG298 


CLAW INTINPUT; 
J43 FERZ4 


MOVE.L DEFWORKyEWORKEND:' EDITOR BUFFER DEFAULT 
544 FEAZ9C ROVE.L GEFASS®  ASSHBES; 


MOVE.L DEFASSE, ASSWEND 


nba? 

345 FEQZAC «MF CAMLADAIC HOVE.L $18241C, xOUTOR; 
abi? 

J47 FEQ2@4 «© HF CADLATI4A WOVE.L $10734A, (MOVED: 
BBL A 

34g FERDBC | gt pAeL44 BSR CLEARRG: | CLEARS REG AND BP's 

349 FERDCa = AETS RTS} 

ce 

751 FEG2C? © A{FALQ08 «-«sTRAPAHAS LEAL SUSYSPRUNETAR AG: 

152 FER?Ch «ETI QTE: 

753 __- 

154 

355 193 SECODE A COMMAND #3 

a8 


357 FEB2C8 
338 FEG2CC 
359 FEAZCE 
368 FEA2D? 
Jot FEADDS 
Jé2 FEBZDS 
363 FEQ2DA 
Jh4 FEBPDE 
“ASE FES2ER 
366 FEAZES 
Jé7 FE@ZES 
368 FEQZES 
J69 FEAZE! 
378 FEGZEE 
Tt FEAR? 
J72 FEa2Fé 
373 FER2FS 
Ji4 FEAZFS 
375 FEGZFA 
«76 FEB2FE 
37? 

Jig 

379 

588 FEAIA2 
Jai FEBIe4 
382 Feazee 
383 FEGIGA 
384 FEAIAC 
385 

386 

38? 

388 FEAIBE 
389 FEAIL4 
598 


61888738 
2h4C 
ALFALZa¢ 
S21) 
Jat8 
BOT CFFFF 
b789F E86 
225% 
SERESLLL 
bbRE 
1981 
PRICaH8 
bRES 
BRICGH38 
bAEB 
p74 
Soit 
4E9f 
Gb88FDE4 
ABBE DLE 


1310 
Be3CBA2A 
biF8 
3380 
4E75 


DECODE: 
DECODES: 


DECODE!: 


wz 


BECORES: 


BSR PCRLF; 
ROVEA.L A49,A53 
LEAL SONTAR AD; 
MOVE. W fA5}4,04; 
AOQVE.d (AB) +, 084 
CHP LW -2 084 
BER. ALQOPI 
MOVEA.L (AB)+, AL: 
CmP Ba) 08 
BNE PECODES; 
MOVE.8 D1, 08: 
CHP.E 8" DA; 
BHI DECODES 
CHP.B ' 8" 08: 
BPL.5 DECODES; 
AP a GBSDLS 
BHE.S CECOnEL 
JSR fat) 

BNEW BLOOPS; 
BRA.W MLOOPS 


's¢ QEMOVE BLANKS #3 


RERBLARK: AQVE.B (A5)+.085 


CMPLB #278, 08; 
BEa.5 RERBLANK: 
SUBQ.L 1,A3s 
RTS; 


'## STEP COMMAND #4 


SiFCOBA18544 = STEP: 


6864 


MOVE.W 1, STEPFLS; 
BRA.S TRACES; 


ee 


CURRENT POINTER 
START GF CORMARDS 
GET FIRST 2 CHAR, 
QE7 COMMAND 

REACHED EXD OF TAB? 


aE} AGDRESS GF COMMAND 
MUST BE HUMBER? 

HQ: OK 

TRANSFER CHAR, 

LESS THAN ZEPO? 

YES: NOT HIT 

GREATER 7? 

YES: HOT HIT 

HIT COMMAND? 


S: HEYT CHARACTER 
JUST POINTER 


' SINGLE STEP 


13.85.85 


J 

392 

J93 FEAS16 
394 FEGSIA 
J95 FEQ320 
396 

397 

398 

399 

489 FEAI24 
481 FEAI2A 
482 FEGI2¢ 
483 FEQI3@ 
484 FEA3I4 
405 FEGI38 
486 FEQ3IC 
407 FEB342 
408 FEQI44 
489 FEG34A 
410 FEAS4E 


ALL FE@354 
412 FEBISA 
413 FEQISE 
414 FEQI42 
415 FEAI&4 
415 FEBIG8 
417 FEBI6C 
418 FEGI7@ 
419 FEIT 
428 FEA378 
421 FEQ37C 
422 FEQQ7E 
423 

424 

25 

26 FEBR2 
427 FEO388 
428 FEAR 
429 FEOIRE 
438 FE8392 
431 FEG394 
432 FEAI9A 
433 FEBIA0 
434 FEBIAG 
435 FEA3AS 
436 FEQIAC 
437 FEQIBA 
438 FEBIB4 
439 FEAIB4 
448 FEQIBA 
441 FEAIBE 
44 
443 

444 

445 FEO3C2 
445 FEQICR 
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42780544 


BF 880878542 


68088146 


SOF O7FFFASSC 


4£68 

2108859( 
Si DFA5A2 
21DF@544 
21 CF 8598 


2E7CRAARB4ED 


16380557 
6{2882F8 
G1 8RBSAE 


aap sanesaaee 


0558 

61298206 
44788544 
bb88F D464 
44380556 
6588 

61888698 
6B80815A 
61888326 
61868322 
B@30 8880 
64EA 

GBRRFD46 


48F O7FFFA5SC 


4£68 

2108859¢ 
S1OF@5A2 
21 DFESA4 
21CF 8598 


2E7CABRRA4ED 


51888658 
35B88544 
4BFAGFBC 
61688148 
2B TB05A4 
7288 

b188868C 
61808886 
bBHAFDG6 
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'## TRACE - COMMAND 34 


TRACE: 
TRACEL: 


CLR.W STEPFLSS 
BSET.B 7,STRG; 
BRA.W SOCOM; 


! NO SINGLE STEP 
' TRACE ON 


'## TRACE AND SINGLE-STEP #8 
'## EXCEPTION PROCESSING © #8 


TRACEIN: 


TRACEING: 
TRACEIN2: 


NOVER.L 08-D7/A8-Ab,REGS;! SAY 
MOVE.L USP, AQ; 

MOVE.L AB,USTPS =! SAVE USER-STACKPOINTER 
MOVE.W {A7)+,STRG}' AND STATUS-REG 

MOVE.L (A7)}+,PCRG3! AND PROGRAM-COUNTER 
MOVE.L A7,SSTPS = ' AND STACKPOINTER 

MOVE.L NONST,A7; ©! RESTORE MONITOR-STACK 
MOVE.B INTINPUT+4 08; 

BSR QUTCH; ! HAY SET TO CLEAR SCREEN 
BSR PCRLF; 

ORI.L $40088,REGFLAG;! SHOW PC ALWAYS 


YSER REGS 


BSR OUTRES; 
TST.W STEPFLG; 
BNE.W MLOOP; 
TST.B INTINPUT; 
BNE.S TRACEIN2; 
BSR PCRLF; 
BRA.W SOCOM; 
BSR INCH; 

BSR INCH; 

CHP.8 $80,08; 
BNE.S TRACEIN4; 
BRA.W MLOOP; 


! SHOW REGISTERS 
! SINGLE STEP? 
' YES: BACK TO MONITOR 


! IF TRACE IS ON 


! 1S BLANK 


'## BREAKPOINT COMES HERE IN #4 


BREAKIN: 


MOVEN.L D@-D7/A8-Ab, REGS}! SAV 
HOVE.L USP, AG; 

MOVE.L AB,USTP; ©! SAVE USER-STACKPOINTER 
MOVE.W (A7)+,STRG3' AND STATUS-REG 

MOVE.L (A7)+,PCRG; ! AND PROGRAM-COUNTER 
MOVE.L A7,SSTP; ! AND STACKPOINTER 
MOVE.L MONST,A7; ! RESTORE MONITOR-STACK 
BSR PCRLFS 
SUBG.L 2yPCRG; 
LEA.L TBRP,AS; 
BSR PDATA; 
MOVE.L PCRG, 08} 
NOVES.L 8,01; 
BSR PRINIB; 

BSR BREAKING; 
BRA.W MLOOP; 


USER RESS 


! ADJUST Pe 
! PRINT NESSAGE 


! PRINT BREAK-ADDRESS 


'## REMOVES BREAKPOINTS FROM RAN #8 
2070808805A8 BREAKING: MOVEA.L $BPRG,AQ$ ! POINT TO FIRST BP 
7487 


MOVES.L 7,02; | 8 BPS 


13.25.85 


447 FEAICA 
443 FEAICC 
449 FERICE 
458 FEGI0a 
431 FEQID4 


ake he oe te 


i2zee ..htes 

a 2 

Cm -~4 

“St ore “SS 
mnamnnnoire rv 


SS tS beef 


em 

goer doe 

4 

ry 

Los Pos 
Cd Cd 
mare 
rea 


z FERIA 
FERS A 
| FEQIFS 


FEQIFA 


9 FERIFE 


472 

473 FER482 
474 FEAaB4 
475 FEG4BA 
476 FEB4BC 
477 FES4Ae 
478 FERMI? 
479 

489 

431 

482 FERS 4 
483 FEG4E 
454 FEBHIC 
485 FEAS{E 
486 FER422 
487 FEGA24 
488 FEASZS 
489 FERA2C 
498 FEBAI? 
491 FEG438 
492 FEBAIC 
493 

494 

495 

4% 

497 FEGAIE 
498 FER44? 
499 FEG&44 
588 FEG448 
581 FEBS 
382 FEG4S4E 
583 FEB452 


keys 


268 
b7R6 
2443 
c4AB ORC 
SitAFFFS 
4E75 


B1BaFF 2h 
PR ICeanl 
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BREAKIMI: 


BREAKIN2: 


NOVEL (AB)+,035 
BEQ.S BREAK IH2; 
MOVEA.L D3,A23 


SAM GK MONITOR VERSION 2.3 


' GE7 ADDRESS OF BP 


MOVE.L 28(AB),(A2);! RESTORE OPCODE 


ORF $2, 8REAKING; 
RTS: 


! AGAIN TILL END 


bald 
489 
7987 
2008 
S1C9FFFE 
aWICAgSS 
E75 


b8I8888 
80887 4C 


at 

287 (88888556 
4288 

cath 
SICSFFFE 
4E75 


CLEARBP: BSR REEBLANKS ' REROVE BLANKS 
CHP. E SBD, 08; ' COMES <CR>? 
HELD CLEARBPS; 9 | NO: ERROR 
ROY ' POINT 7G FIRST eP 


QVEA.L EBPSS,Aa: 
reAL Das 
MOVES.L 74048 
MOVE! DR, (AB) +3 
DBF 1, CLEARBE4: 
ORI.8 4,CCR: 
RTS, 


1 8 BPS 
: GLEAR iT 


CLEARB PI: | 
' NO ERRGR 
CLEARBP?: 


ie SET BREAKPOINTS #4 
BREAKP: 


ADD.E $2.00; 

BRA. a ADRES; 

'## CLEAR REGISTERS AND BREAKPOINTS #4 
CLEARRG: =NOVEG.L 26,043 
MOVEA.L $PESS, Ag; 
CLR.L 98; 

MOVE.L 8, (AR) +3 
DBF 31, CLEARRGL; 
RTS; 


1 27 REGISTERS 


CLEARRSI: ' CLEAR THES 


'## DISPLAY ALL BREAKPOINTS #4 


G{88FEEC 
BBICEHED 
bo{E 


DISEP: 


BSR REMBLANKS 
CHP.B $00,085 
BNE.S DISBP9; 


! RERQVE BLANKS 
1 ES <CR>? 
' NO ERROR 


4QE7FFFE 
4286 

4285 
2ESC2RaRREFF 
287 (ORBBG5A8 


«22 TCARFEL IIS 


8888138 
4E75 


61929878 
3380 
4JFAGHLE 
2678659C 
2689 
28780598 
2889 


MOVER. L 28-07/AB-Ab,-(A7) 5 
CURL Ob; 

CLR.L O53 

MOVE.L $FFy07; 
MOVEA.L $BP26, a8; 
MOVEA.L $8PTAR AL; 
BRA.W OUTRESS; 
RTS} 


! DISPLAY THEM/BACK TO MON 
DISEP9: 


tee CALL - COMMAND #4 


BSR SEANEXT; 
SUBG.L 1yA5} 

LEAL CALLOGAL AL; 
MOVEA.L USTP AG; 
MOVE.L AL, (AQ) 5 
HOVEA.L SSTP,AG; 
ROVE.L AL, (AB)s 


CALLCOM: 


13.85.85 


564 FEG454 
585 FEG456 
306 FEBA5A 
387 
388 
589 FER45E 
518 FEB464 
S11 FEG464 
312 
313 FEB468 
314 FEG4SC 
315 
316 
57 
318 FEG4dE 
319 FEQ474 
328 FEG478 
21 FEG47C 
322 FEBATE 
323 FEB482 
324 FEA484 
325 FEB4B6 
326 FEB48A 
327 FEB4BE 
528 FEG494 
329 FEB494 
538 
331 FEG498 
532 FEA49A 
553 FES49C 
334 FEB49E 
335 FEB4AG 
336 FEG4A4 
537 FEB4A6 
338 
339 FEQ4AA 
348 FERAAC 
341 FEG4AE 
342 FEB4B2 
343 FEG4B6 
544 FER4BA 
345 FEG4BC 
546 FEB4C8 
347 FEB4C4 
348 FEB4C8 


349 FEG4D8 


358 FEG4D8 
351 FEG4DC 
352 FEB4DE 
353 FEGAE4 
554 FEG4ES 
355 FEB4SEC 
536 

537 FEG4EE 
558 


kv 


6818 
GiSQFFOA 
GOGGF COA 


11F(808C8557 
9888 
4E75 


42380557 
475 


888800878542 
b{@BFERC 
8015808) 
678C 
61988802 
bbbA 

4284 
21C885A4 
S23C4E4E 

267 COGBG85A8 
7467 

4284 


2618 
578A 
5284 
2443 
2152861¢ 
3481 
Si CAFFFG 


4Aa4 

672A 
{080544 
ABFAGEDS 
61888096 
1664 
00308038 
618061 7E 
61988534 

21F COGFEGI24 
8824 

21F COBFERI82 
0088 
2078859C 
4E48 
4CFAFFFFA55C 
2F 388544 
JFI8G5A2 
4E73 


475 
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CALLCOM!: 


TOCON: 


Tt: 


's# G0 - 
60COH: 


GOCON4: 


GOCOM?: 


G0COM3: 


GOCOM{: 


GOCOMS: 


GOCOMERR: 


SAM 68K MONITOR VERSION 2.3 


BRA.S SOCOMS 
BSR BREAKING; 
BRA.W NLOOP; 


ROVE.B {2,INTINPUT#{; 
SUB 68,08; 
RTS; 


CLR.B INTINPUT +4; 
RTS3 


COMMAND #4 


BCLR.B 7,STRES 
BSR REMBLANK; 
CHPI.B $8D,{A5)§ 
BEQ.S GOCOM4; 
BSR READHK; 
BNE.S GOCOMERR; 
CLRL D4; 

MOVE.L 08,PCRS; 
NOVE.W S4E4E, D1; | TRAP #14 IS BREAK 
MOVEA.L #BPR5,AQ;' POINT TO FIRST BP 
MOVES.L 7,02; =| MAX. 8 BP’S 

CLR.L 04; 


! ALWAYS TRACE OFF 


MOVE.L (AB)+,03; ! GET BP 

BE2.5 G0COM3; | BP=8: DO ROTHING 
ADDG.L 1,04; ! BREAKPOINT COUNT 
HOVEA.L 03,A25 

MOVE.L (AZ) ,28(AQ)3! SAVE OPCODE 
MOVE.W D1,(A2); = | PUT BP INTO MEM 
DBF 02, G0C0H2; ! AGAIN TILL END 


TST 04; 

BE4.S G0COMS; 

BSR PCRLF 

LEA.L MESSACT AS; 

BSR PDATA; 

MOVE.B 04,08; 

ADD.B ‘8’ 08; 

BSR QUTCH; 

BSR PCRLF} 

MOVE.L #TRACEIN, TRACEVCT;! SET VECTOR 


MOVE.L #BREAKIN,BRKVCT; ' SET BREAK-YECTOR 


MOVEA.L USTP, AG; 
HOVE.L AG, USP; 


MOVE.L PCRG,-(A7)§ 
HOVE.W STRG,-(A7); 
RTE;! G0 AWAY 


' LOAD SR+PC 


RTS; 


| LOAD USER-STACKPOINTER 
MOVEN.L REGS,A@-A7/D8-073' LOAD REGISTERS 


339 

368 

361 

362 

563 FER4FE 
564 FEARS 
565 FEBAFB 
566 FEG4FA 
367 FERAFC 
368 FERSFE 
369 FEG592 
378 FEG5A4 
S7t FEG586 
72 FEBS@A 
373 FE@5aC 
574 FEBSGE 
575 FEBS12 
376 FEBSL4 
577 FEG518 
378 FEQSIA 
379 FEASIC 
388 FEG528 
381 FEB522 
582 FEB526 
383 FEG528 
384 FEG52A 
585 FE@52E 
384 

387 FEG538 
588 FEG532 
589 FEG534 
598 FE8536 
591 FES5IA 
592 FE@SIE 
593 FESS 48 
594 FE@542 
395 

396 

597 

598 FEAS44 
399 FEB5S48 
688 FE@S4C 
681 

682 

683 

584 

685 

606 FEBS4E 
687 FEG55@ 
608 FEBSS4 
689 FE@556 
618 FE@SSA 
611 FEG55C 
612 

613 

614 

6{5 


kv 


49F 80628 
ADF 8Q67A 
§2it 
BDCC 
BOF A 
49F b8628 
2A4C 
4288 
61980198 
4Aang 
b7F4 
BasCeHes 
b71¢ 
BG3C887F 
6716 
1ACB 
(888880 
6780 
b19801iC 
BBCE 
O5DA 
25C90FB 
4€75 


BBCC 
5708 
2FaD 


4BFAGEGE 


61868812 
2A5F 
338) 
b8(8 


4BFAGES9 
61080804 
4E75 


1610 
Ceeee84 
6786 
b18880E8 
68F2 
4E75 
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's# GET A LINE TQ LINESUFFER, 


's# A4: BEGIN OF LINE BUFFER 
's# Ab: COMBUFF-END 


INLINE: 
CLBUFFER: 


INLINE®: 
INLINEL: 


IRLINEZ: 
INLIDEL: 


's# PRINT "WHAT?" #8 


WHAT: 


LEA.L COMBUFF Aa; 
LEA.L CONEND, Ab; 
CLR.B (Aa) +; 
CHPLL A%yAb; 

BNE CLBUFFER; 
LEA.L COMBUFF Aa; 
NOVEA.L A&,A55 


CLR.L 08; 
BSR INCH; 
TST.B 085 


BEG.S INLINEL; 
CHP.B $88,085 
BEQ.S INLIDEL; 
CHP.B $7F yD8; 
BEQ.S ENLIDEL; 
MOVE. DB, {A5}+5 
CHPI.E $80,085 
BEQ.S INLINE?; 


BSR OUTCHS 


CRPA.L AbsA5; 
BCS INLINE!; 
ANDI.B SFB, CCR; 


RTS; 


CAPA.L AS SAS; 
BEG.5 INLINE!: 
MOVE.L AS y-{A7) 5 
LEA.L TDEL,A5; 


BSR PDATAS 


MOVEA.L (A7)+,A55 
SUB@.L 1,855 
BRA INLINES; 


LEA.L TWHAT,A5; 


BSR PDATA: 
RTS; 


' START OF BUFFER 
' END OF BUFFER 


! CURRENT POINTER 


' BACKSPACE? 
| DELETE? 


+ END OF LINE? 


' ECHO CHARACTER 
' END OF BUFFER? 


! [=8: REPORT ERROR 
t defi 


NO ERROR 


' AT BESIN OF BUFFER? 
' INLINE! 00 NOTHING 
' SAVE POINTER 


'## PRINT TEXT TILL $04 CONES UP #8 
'$# (AS) POINTS TO FIRST CHAR. = ## 


PDATA: 


PDATAL: 


MOVE.B (A5)+,08; 
CHPI.B $04,008; 
BE4.5 PDATAI; 


BSR QUTCH; 


BRA.S PDATA; 


RTS; 


' REACHED END OF TEXT? 


' 00 IT AGAIN 


'## QUTPUT REGISTERS ACCORDING REGFLAG ## 


13.85.85 


b16 
b17 FEASSE 
618 FE@562 
619 FEBSO4 
628 FEG546 
621 FE@5SA 
$22 FEBSSE 
623 FE8572 
624 FEAS74 
25 FE@S74 
626 FEG578 
627 FEAS7A 
628 FE@S7E 
629 FEAS88 
638 FEQ58? 
631 FEGS8S 
632 FEGSES 
633 FEAS&C 
534 FEGSBE 
635 FEG592 
636 FEBS 
637 
638 FEAS98 
639 FEGS9A 
648 FEG5S9E 
641 FE@5AQ 
642 FEASA4 
543 FEASA6 
644 FEGSAA 
645 
646 FE@SAC 
647 FEASB@ 
648 FEB582 
649 FE@5B4 
658 FE@5BA 
451 FE@5BE 
652 FEASC8 
653 FEA5C4 
654 FEG5C8 
655 FE@SCC 
454 
657 
558 
659 FE@SCE 
668 FEGSD2 
641 FE@5D4 
662 
663 FEGSD8 
664 FE@SDC 
665 FE@SDE 
646 FEBSE2 
667 FE@SE4 
668 FEQSES 
669 FE@SEA 
678 FEQSEE 
671 FE@SF@ 
672 FEGSF4 


kv 


4GE7FFFE 
4286 
4285 
2E 588558 


M{FS@55¢ 


4SFAGDCO 
2418 
Jat? 
3087 
5724 
61808839 
7288 
2882 
51988448 
3285 
aCe5e884 
5794 
32308884 
51828492 
6886 


4285 
6189845E 
3286 
ACB68813 
b6C¢ 
ACDFTFFF 
4E75 


61888892 
E848 

6188888 
5230888! 
bi BBR46A 
7830 

6188887E 
52508081 
6188045¢ 
4E75 


2B6F 8002 
5818 
2F 480082 


acaaenal 
6686 
61988822 
bait 
90400882 
6686 
6168283C 
6818 
80480083 
b7E8 
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QUTREG: 


QUTRES!: 


QUTRESS: 
QUTREG2: 


QUTREGS: 


SAM 68K MONITOR VERSION 2.3 


MOVER.L 08-07/AQ-Ab,-(A7); 

CLR.L 06; ! BIT POINTER REGFLAG 
CLR.L 055 ! NUMBER IN LINE 
MOVE.L REGFLAG,D7; 

LEA.L REGS, AQ; 

LEA.L RESTAB,At; 

NOVEL (AB) +,025 

MOVE.W (AL) +, 085 

BTST.L 04,075 
BEG. QUTREG2; 
BSR QUTRESS; 
MOVES. L 8,015 
MOVE.L 02,085 
BSR PRIWIB; 
AODe.8 1,05; 
CMPI.B 4,053 
BEg.S OUTRESS; 
MOVE. W 4,045 
BSR PBLANK; 
BRA.S OUTREG2; 


! PRINT REGISTERNANE 


CLR.L 05; 

BSR PERLE; 

ADDG.8 1,06; 

CHPILB 19,063 

BNE.S QUTREGI 5 

MOVEN.L (A7}+,D8-D7/A8-Ab; 
RTS; 


BSR OUTCH; 
LOR.W 8,085 

BSR OUTCH; 
ROVE.W 1,04; 
BSR PBLANK; 
HOVEG.L '=' 508; 
BSR QUTCHS 
MOVE.W 1,015 
BSR PBLANK; 
RTS} 


‘#8 TRAP 15 HANDLER (RESEVERD FOR 1/0) #3 


TRAP{SHA: 


TRAPIO4: 
TRAPIO2: 
TRAPIOS: 
TRAPIOS: 


MOVEA.L 2(A7),AQ3 ' IN AB IS USER PC 
MOVE.W {A@)+,085 | IN 08 HANDLER-NR. 
MOVE.L Ay2(A7); ' PC IS NOW BEHIND HANDL.NR, 


CNPI.W 1,085 
BNE.S TRAPIO2; 
BSR ACIALINL; 
BRA.S TRAPIOE; 
CMPI.W 2,085 
BNE. TRAPIO3; 
BSR ACIALOUL; 
BRA.S TRAPIOE; 
CNPI.W 3,08; 


BE@.S TRAPIO’; | 1S THE SAME AS TRAP FNC{1) 


13.95.85 kws Diskassembler Page: 14 SAM 48K MONITOR VERSION 2.3 


b76 

S77 FERSBS 
678 

679 

582 

68! 

b82 

483 

584 

685 

686 FER4A2 
b87 FERSAS 
588 FEREG8 
689 FE@GHA 
598 FEQ6!2 
691 FERGL4 
692 FEG618 
693 FERIA 
694 FEGSIE 
695 FES&28 
696 FEG622 
697 FEB626 
598 

699 

788 

iat 

782 FEB628 
TAS FEBS2C 
784 FEG6I8 
705 FE8632 
746 FEAGS4 
747 FEG638 
708 FEBOIA 
789 FEGG3E 
718 

if 

Yi 

713 

714 

75 

746 

i{7 

718 

719 

2 

724 


AT 


iv 
724 
796 
iia 
74 
is 
721 
728 
129 


acaaaaad 
ATEE 
GBABACEE 


4E73 


4BE7ABBC 
24D. 
2040 


DOF CBRRRERS9 


ALBBFEFS 
b 128054 
2C4C 
BCLERBAD 
bOFA 
338E 
4COF 3888 
4E75 


ABE 78004 
G1 888300 
1010 
61888880 
BOCd 
b2F6 
4COF 2001 
475 


CHPL Ww 4508; 
BE9.5 TRAPIO5; 
BRA.W TRAPERR: 


TS LIKE TRAP FNC{2} 
ONLY FRO (1,2,5,4) 


TRAPIQE: = RTE} | UND WEITER IM USERPROGAMN 


'## INPUT ONE LINE FROM ACIA { 4% 
'# A5/A6 15 START OF SUFFER 


ACIALINL? AOVEN.L A4-A5,-(A7); 
MOVEA.L AS AS: 
MOVE. AS, Ab; 
ADDA.L 89,A5; ' ERST MAL NUR 88 ZEICHEN ! 
BSR INLINES; 
BSR PCRLFS 
ROVEA.L A4,AG; 
ACIALING: CHPI.B $80, 1A6)+; 
BNE.S ACIALING; 
SUBG.L LyAbs 
MOVEN.L {A7)+,A4-A95 
RTS; 


's# PRINT ONE LINE INFOR, SETWEEN AS AND Ad-! 


ACIALOUL: AOVEM.L AS/28,-4A7)5 
BSR PORLES 

ACIALQUL: NOVE.B (A5)+,08) 
BSR OUTCH; 
CHPA.L AS, Ab; 
BHI.S ACIAIOUI; 
MOVEM.L (A7)+,A5/085 
RTS; 


'eeeee¢¢ 1/0 HANDLER GOES OUTPUT ACORDING [OFLAG #4488 
' BIT 8 TS QUTPUT ACTA 1 OR VIDEO 
'¢ BIT 1 15 QUTPUT ACTA 2 


i 

'y 

'¢ BIT 15 15 TO AN USER DEFINED ROUTINE 
'g THE LOCATION IS IN RAN AT USEROUT 
1s 

1g 

'¢ BIT 16 IS INPUT ACIA 1 OR TAST - 

's BIT 17 15 INPUT ACIA 2 

if 

13 

'¢ BIT 34 15 INPUT OVER THE USERIN 

_ LOCATION 1S iN PAN 


I SESEEREEELESSSISES ESE ESELERSEPEELELSSIELE SELES EEREE HY 
'g USER DEFINED IN/OUT MUST END WITH AN RTS 

'¢ 08.8 IS THE CHARACTER TO TRANSHIT? 

's ALL OTHER REGISTERS MUST BE PUSHED/PULLED 


13.95.85 


738 
3M 

732 FEBS4@ 
733 FER44 
734 FEB648 
735 FE@GAC 
736 FEASEE 
737 FE@454 
738 FER454 
739 FEGASA 
748 FE@SSC 
7H 

742 FEQ468 
743 FEAGSA 
744 FEAGGS 
745 

745 FEBGGA 
747 FERGAE 
748 FEQ470 
749 

758 FEG474 
751 FEGS78 
752 FEBS7A 
753 

754 FEQG7E 
755 FEQ482 
756 FEBGB4 
757 

758 

759 

7h8 FEG4BS 
Th FE@GBC 
72 FE@S8E 
743 FE@69? 
Tha FEG4% 
765 

Thb 

767 

768 

79 FEB49 
778 FER&9C 
711 FEBGAQ 
772 FEBBAA 
773 FEAGAG 
774 FEBGAA 
775 FEQGAE 
774 FEQGBO 
777 FEA6B4 
778 

779 

788 

781 FEAGB8 
782 FEBEBC 
783 FEQSBE 
784 FEBKC2 
785 FEA6CS 
786 


kw 


48674008 
22380546 
88819880 
b712 


983800048991 


6686 
61888878 
6884 
b{881AG6 


08818061 
6794 
61889872 


98818803 
6734 
b188887A 


6818884 
6784 
61881448 


98918085 
784 
61880842 


8821 880F 
6784 
4EBBQ5EE 
4COF A882 
4E75 


48E74808 
22588546 
B8018018 
6784 

61880994 
8681081! 
6784 

6{88889A 
6019812 


0881 081F 
6784 
4ERBO5F 4 
4C0F A882 
4E75 
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TEEESELSEESLE EELS ELELEESESLE TELE SSS ESSE ELSE PESELELEEEE 


QUTCH: 


VIDEGOUT! 
QUTCHI: 


QUTCH2: 
QUTCHS: 


OUTCHA: 


CUTCHS: 


QUTCHIS: 


QUTCHI4: 


INCH: 


INCHO2: 


INCHOS: 


INCHOLS: 


INCHOL6: 


MOVEN.L 01-B1,-(A7); 
HOVE.L IOFLAG, D4; 

BIST.L @,04; 

BEQ.S QUTCHI; 

BTST.B 4,PLADRA; 

BNE YIDECOUT; 

BSR QUTAL; 

BRA QUTCHI; 

BSR.W QUTCHAR; ! AUF YIDEC 


BTST.L 1,04; 
BE4.S QUTCH2s 
BSR QUTA2; 
! ON ADCR NO BYTETRANSFER 
BIST.L 3,04; 
BEQ QUTCHS: 
BSR QUICENT; 


BTST.L 4,04; 
BEd = QUTCHS; 
BSR = QUTCHAR; 


BTST.L 5,045 
BE? = QUT CHES; 
BSR = QUTAL; 


BIST.L 5,043! 15 FOR USER DEFINED OUTROUTINE 
BEQ.5 QUTCHI4; 

JSR USEROUT; 

MOVEN.L (A7)+,D1-D43 

RTS§ 


MOVEN.L Di-B1,-(A7); 

MCVE.L IOFLAG,D1; 

BIST.L 16,045 

BE9.5 INCHO2} 

BSR IMAL; 

BIST.L 17,045 

BE9.S INCHO3; 

BSR INA2; 

BIST.L £8,013! RESEVERD FOR LATER USE 


BIST.L 34,015! 15 FOR YSER INPUT 
BE@.S INCHOL4; 

JSR USERIN; 

MOVEN.L (A7)+,01-D1; 


ATS; 
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787 
788 
789 
798 
791 FEB6C8 
792 FEBOCA 
793 FEAODA 
794 FEBED2 
795 FEBSDS 
796 FEGSD8 
q97 
798 
799 
806 
BQ1 FEGGDA 
862 FEBGDC 
B63 FEGGE? 
Sh4 FEBGE4 
885 FE@GES 
884 FEBOEA 
867 
868 
869 
818 FE@GEC 
B11 FEGSF2 
S12 FEGGF4 
B13 FEGGFA 
B14 FESGFC 
O15 FEB7E2 
816 FEG7B4 
B17 FEB7@A 
818 FEG7EC 
819 FEG7IO 
828 FEQ714 
821 FEG718 
822 FEG7IA 
823 FEA728 
§24 
§25 FEG722 
826 FEB728 
27 FEA72E 
828 FEG734 
29 FEA7IA 
838 
834 
832 
833 FEG7I¢ 
834 FEA748 
835 FEA742 
B36 FEG746 
837 FEB74A 
838 
839 
848 
B41 FEG74C 
B42 FE@752 
843 FER758 


kys 


2F 88 
83828028085 
STFS 
11C88C01 
Z81F 

4E75 


2F 68 
883808028087 
b7F8 
11088083 
281F 

4E75 


QC 38007F 6885 
b62E 
083808078819 
6726 
083880068819 
b7{E 
88386007880! 
bore 
11(88881 
ABB88005 8819 
471 

4E7 i 

B&F 689058819 
4E75 


11FCG87F 8805 
GBF 800058819 
GBF 860068819 
G8F 869878819 
68(8 


44380556 
bTFA 
10388554 
42388556 
4E75 


11708685887 
11FCOGEA8C87 
963809808087 
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'## QUTPUT TO ACIAL = ## 


QUTAL: 
QUTALI: 


NOVE.L D@,-(A7); 
BIST.8 2,ACTAICO; 
BEQ.S OUTAII; 
MOVE.B DB,ACIAIDA; 
MOVE.L (AT) 4,085 
RTS; 


's# QUTPUT TO ACIA2 #4 


QUTA2: 
QUTA2{: 


! THESE ROUTINES ARE CHANGED 
' TO SERVICE THE MPSC 

MOVE.L D6,-(A7); 

BIST.B 2,ACIA2(0; 

BEG.S QUTAZ1; 

MOVE .B DO ,ACIAZDAS 

MOVE.L {A7) 4,00; 

RTS; 


' QUTPUT TO CENTRONICS COMPATIBLE 7-BIT PAR. SS 


QUTCENT: 


CENTRWAI: 


INICENT: 


CHPI.B $7F,VIAPBDIR; 
BNE.S INICENT; 
BIST.B 7,VIAPPCR; 
BE@.S INICENT; 
BTST.B dy VIAPPCR; 
BEQ.S INICENT; 
BIST. 7,VIAPBDAT; 
BNE.S CENTRWAI; 
NOVE.B D8, VIAPEDAT; 
BCLR.B S,VIAPPCR; 
NOP; 

NOP; 

BSET.B S,VIAPPCR; 


RTS; 


MOVE.8 $7F,YIAPBDIRS 
BSET.B 5, VIAPPCR; 
BSET.B &,VIAPPCR; 
BSET.B 7, VIAPPCR: 
BRA.S CENTRWALS 


's# INPUT FROM ACIAL #4 


INAL: 


TST.B INTINPUTS 
BEQ.S INAI; 

MOVE.B INTINPUT D8; 
CLR.B INTINPUT; 
RTS; 


' DA ABGEHOLT 


'## INPUT FROM ACIA2 #4 


INA2: 
INAX2: 


MOVE.B SyACIA2CO; | WRITE POINTER TO REG #5 
MOVE.B SEA,ACIAZCO} ! ENABLE RTS AND OTR 
BTST.B B,ACIA2CO; 
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844 FEA7SE 
845 FEG768 
846 FEA7b4 
847 FEQ7&C 
848 FEQ77@ 
849 FEBT74 
858 
85! 
§52 
§53 
854 
855 FE@776 
856 FEQ77A 
857 FEG788 
858 FEG7B6 
859 FEB788 
$68 FEG7AC 
841 FEG7BE 
862 FE8792 
863 FEG794 
844 FEB798 
865 FEG79A 
866 FEB79E 
847 FEA7A4 
848 FEB7AG 
859 FEB7AA 
878 FEB7AE 
471 FES7BA 
872 FEB7B4 
873 FEQ7BA 
874 FEa7C8 
875 FEA7C2 
874 
877 
878 
879 
888 FEA7C4 
881 FEG7CA 
882 
883 
884 
885 
884 
§87 
888 
889 
898 
894 
892 
893 
894 
B95 
896 
897 
898 
899 
908 


b7F8 
11FC88058C87 
11FC@0688C87 
16388003 
98800607 
4€75 


61888282 
1{FCOGG58C67 
LiF COBEABCG7 
7404 
44380554 
6718 
18380554 
42380554 
8488 

b716 

61 9QFF IE 
983860008087 
b7E2 
18388083 
b{B0FES4 
6808 

6190824 

LiF CAG858C87 
11FCOA688087 
9868 

4E75 


083888078907 
67888138 


BEQ.S INAX2; 

MOVE.B 5,ACIAZCO; 

MOVE.B $68,ACIAZCO; ! DISABLE RTS AND OTR 
MOVE.B ACIAZDA, D5 

BCLR.L 7,08; 

RTS; 


'## TRANSPARENT MODE FOR HOST SYSTEMKOPPL. #4 
'## ON ACIAL TERMINAL : ON ACIA2 HOST ## 
HOSTTR: BSR PCRLF; 
MOVE.B $5,ACIA2CO; ' AND THIS WITHOUT 4.5. 
MOVE.B SEA,ACIAZCO; 
MOVEG.L $01,025 
HOSTTRG: TST.B INTINPUT; 
BEQ.S HOSTTR?2; 
MOVE.B INTINPUT, 08; 
CLR.B INTINPUTS 
CHP.B 08,02; 
BE@.S HOSTEND; 
BSR QUTAZ; 
HOSTTR2: BTST.B B,ACIA2C0; 
BEQ.S HOSTTR1; 
MOVE.B ACIA2DA,D8; 
BSR QUTCHS 
BRA.S HOSTTR1; 
HOSTEND: BSR PCRLF; 
MOVE.8 SS,ACIAZCO;! RTS ACTIVE 
MOVE.B $68,ACIA2CO; 
SUB 08,08; 
RTS; 


' CTR A IS END OF TRANSPARENT 


'## INTERRUPT SERVICE FOR AUTOVEKTOR 3 INTERRUPT +3 


SERVICES: BIST.B 7,PIACRB; 
BEQ.W SERVACIAS ' PIA WARS NICHT 


/ RESEESELLESEESELESSETESEESEELEELEESESSEESESEESELSE 
t i 
t INPUT-TASTATURTREIBER i 
i FUER t 
t RAFI TASTATYR 3.93 104.151 t 
t (c) kws 1983 i 
i i 
SEETELSELEELESEELESEEELESSELEELEEEL EELS EELEPEEELESE 
i i 
# DIESER TREIBER CODIERT DIE YON CER TASTATUR t 
+ KOMMENDEN ZEICHEN SO UM, DASS SIE DEM kys t 
# STANDARD ENTSPRECHEN, t 
# # 
# ZUSAETZLICH BEWIRKT: i 
i b 
+ EINGABEZEICHEN FUNKTION i 


age 
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98! 
982 
983 
904 
965 
986 
907 
988 
989 
916 
1. 
M2 
913 FEBTCE 
914 FEBTR2 
915 FEGTDS 
916 FEB7DC 
917 FEQ7DE 
918 FEBTE2 
19 FEBTES 
928 FER7ES 
921 FEA7ES 
922 FEBTFS 
923 FEGTFA 
924 FEGTFS 
925 FEA?FA 
926 FEGTFC 
927 FES8G2 
928 FERRBS 
929 FEG888 
938 FEG3BA 
931 FEB8BC 
932 FEGSIS 
933 FEBSL4 
934 
935 
936 
937 FEBBL6 
938 FEABIA 
939 FEQBLE 
946 FEBBZ2 


941 FEGB2A 
942 FERBZE 
943 FEGBIZ 
944 FERRIS 
945 FEBRI8 
945 FEGSIE 
947 FES&4A 
948 FEQBRE2 
949 FEBB44 
958 FEGR4A 
951 FERB4E 
952 FEG85S 
953 FEG854 
954 FEG856 
955 FE@B5A 
956 FEGRGE 


ky § 
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# $8C (FUNKTIONSTASTE) UNSCHALTUNG AUF US-ASCII- # 
$8) LEICHENSATZ t 
# $80 (FUNTIONSTASTE) UNSCHALTUNG AUF DEUTSCHEN # 
t ZEICHENSAT?Z t 
: 3 
SESETELEESELELSESESELELLELELSESEELEL ESET ERLE ELEE EF / 
FASCIION: EQU $8C; HYS-ASCIIL ZEICHENSATZ 
FOEVTSCHAN: EQU $80; 'DEUTSCHER ZEICHENSATZ 
4BE7 8080 MOVEM.L AG/D@,-(A7)5 
16388985 MOVE.B PIADRB. D8; 
883888848901 BIST.8 4,PIADRA§ 
4732 BEG RET; ‘WIRD PER JUMPER ISNORIERT 
BG3C8883 CHP.B | 3,085 CONTROL € ABFANGEN 
732 BEQ CONTROLS; 
BAICHBEC , CHPLB  FASCITON, 0B} 
5 7R8R8E? BES.W DEVTSCHAUS; 
BAICAABD CMP.B ©FDEUTSCHAN, 08; 
§78AGHC8 BEQ.W © DEUTSCHAN; 
Si FARBES LEA.L TABELLE,AG} 'WIR TRANSFORMIEREN NACHHER 
Bats LOOPAS: CMP.B8 {(AG)+,08; 
678 BEQ GEFUNDEN; 
DiFCORAABARS ADD.L 1, AG3 
OCLOFFFF CNPI.B -1, (AG); 
5784 BE OKBIT?; 
GEE BRA LOOPAG; 
1818 GEFUNDEN: MOVE.B (Aa) 08} 
11088554 OKBIT7: MOVE.B 06,2$554; NIST kws-NORM FUER INT.IN 
ACDF ALG! RET: MOVEN.L (A7)+,A0/D85 
4E73 RIES 
CONTROLC8: 
4COFG181 MOVEM.L (A7}+,A8/D8; 
ABETFFFE NOVEM.L D8-D7/AB-Ab,-{A7}3 
24380546 MOVE.L ICFLAG,O2; ' 02 1S TO SAVE LAST USER I0-CONFISURATION 
2iFCHRR1 BARI MOVE.L STANDIO,IOFLAG3' ANG IN MCR [5 STANDART-I0 
Q544 
bi GSGiCE BSR PCRLFs 
4PFAGB9S LEA.L MESSHCR,A5; 
bi BSF DLA BSR PDATA; 
4284 CLR.L D4; 
O83800078987 SERVIG3: BIST.B 7,PIACRB} 
&7F8 BE9.S SERVIG3; 
E181 ASL.L 8,015 ' INFOQ EINS HOCH 
18388995 MOVE.2 PIADRE, 08; 
BRRAARAT BCLR.L 7,085 
BL GBF DF 4 BSR OUTCH; 
0280 ADD.B 08,013 —! NEUES ZEICHEN DAHINTER 
aceaeeen CMPI.B $0D,09; 
bE2 BNE.S SERVI63; 
6{8881A2 BSR PCRLF} 
8C8141424F aD CNPI.L $41424F80,013 
6716 BEQ.S ABORTPIAI; 
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957 FER862 © ABFAGBAC LEA.L MESSIGNO,AS; 

958 FERRE 3 © SL BAF CES BSR PDATA; 

959 FEBBS6A  4{@RB48E BSR PCRLF; 

968 FE@BGE = 2128544 MOVE.L O2,10FLAG;  ' WAS OLD VALUE 

961 FE@872 © ACDFTFFF MOVEN.L (A7)+,08-D7/A8-Ab; 

962 FEB876 =: E73 RTES 

963 FEG878 © 4CDFTFFF ABORTPIAI:NOVEN.L (A7)+,08-D7/AQ-Ad; 

964 CONTROLC: 

965 FEB87C © 4BETFAFE MOVEN.L DO-D3/AB-AG,-(A7): 

966 FEBB8A © 4bF C2208 MOVE.W $2288,5R3 

967 FE@BR4 © 24F CARB EHR! MOVE.L STANDIO, [OFLAG: 

85464 
968 FE@B8C ©. 21F (88818081 MOVE.L STANDIO,LASTIO; 
A54A 

969 FEQB94 == 1 BR144 BSR PCRLF; 

978 FESA98 §«=s- A BAF B28 BSR BREAKING; ' REMOVES BPTS IN RAM 
971 FERRIC §=§=—- JAF Caaaies44 MOVE.W 1,STEPFLG; 'SOLL ZUM MONITOR ZURVECK 
972 FEABAZ = ACOFTFOF MOVEN.L {A7)+,08-D3/AG-Ads 

973 FEBBAG }38=—s-598F SUBQ.L 6 4,A73 JETZT WIRD GETRICKST... 
974 FEABAB © 48E 78888 MOVEM.i A@-AB,-(A7}5 

975 FEBBAC 28788088 MOVE.L TRAPAVECTOR, AQ: 

976 FEQBRA = 8©6- 2F 4GROA MOVE.L AG,4(A7)5 

977 FEQBB4  —4COF 108 NOVEN.L (A7)+,AQ-AQs 

978 FEGSBB == 4E75 RTS} ‘JUMP INDIRECT VEBER TRAP @ 
979 

988 

981 ' 

982 ' DEUTSCHEN ZEICHENSATZ EIN/AUSSCHALTEN 

983 

984 FEQBBA =: 2F AB DEUTSCHAN:MOVE.L A@,-(A7)3 

985 FE@RBC © 44F 884F8 LEA.L VARIABLES, AQ; 

986 FEABC@ = {1 7CFFFFAGR4 MOVE.B -{, DEUTSCH; 

987 FEB8CS §=—s«25F MOVE.L {(A7)+,AQ3 

988 FEBBC8 © 4ABRFF AS BRA.W RET} 

989 

998 FEBACC § =—-2F 88 DEVTSCHAUS:HOVE.L A@,-(A7)3 

991 FEABCE 44F8B4F8 LEA.L YARIABLES, AQ; 

992 FERRD2 42280004 CLR.B = DEUTSCH; 

993 FERBDS © 285F MOVE.L  (A7)+,AQ; 

994 FEG8D8 © 48GRFFI4 BRA.W = RET 

995 

996 ! 

997 ' VEBERSETZUNGSTABELLE SETZT 8-BIT-CODE UND 

998 ' CONTROL-CHARACTERS IN DIE STANDARD-CODES UM 

999 
1888 FEBRDC © BAA TABELLE: OC.W $8804; SPLIT LINE 
1801 FEBBDE B384 DC.8# $8384; INSERT LINE 

1882 FERRED = = BY TF OC. © $BL7F} 'DELETE CHAR 
{883 FEBBE2 BFA2 OC.¥ © $BF 82; 'HOME DOWN 
1004 FEASE4 = CIC OC.W = $BC1C; 'NODE CHANGE 
1605 FEG8EG 898E OC.W $B9GE; CURSOR RIGHT 

{604 FEQ8ES B7OB OC.4¥ © $B78B; ‘CURSOR HOME UP 
1007 FE@8EA BOF DC.¥  $BBAF; 'CURSOR UP 

{868 FEGBEC §8= C885 0C.W $885; INSERT CHARACTER MODE ON 
{889 FEASEE 213 OC. © $8243; 'DELETE REST OF LINE 
{818 FEBBFA 8 © C22E OC.W © $C22E; 'PUNKT IM ZEHNERBLOCK 
1811 FEABF2 8528 DC.4 © $B52B5 '+ IM ZEHNERBLOCK 
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1812 FERBFS 
{A13 FERRFS 
1814 FESR 
1815 FEBFA 
1814 

1817 

{818 FERBFC 
1819 

1829 FERPA? 
1821 FERS 
1822 FEBSaC 
1822 FES9IS 
1824 FEARLS 
i825 FEAS{S 
idza FERPLE 
tae? Feagt4 
i878 FEAq2§ 
{#29 Feso2¢ 
{838 | 
{834 | 
1832 FEBS3A 
1833 FESPIE 
1834 FEB9&8 
1835 FERI44 
{835 FES94C 
{837 FEB958 


1938 FES958 
1839 FEWISE 
1948 FEGI68 
1841 FE@Qb4 
1642 FEG944 
1843 FEB96C 
1844 FEAQ6E 
1045 FEa?7@ 
1644 FEGI74 
1047 FEAQ78 
1048 FEGI7C 
1849 FEB97E 
1858 FEQQR2 
1851 FEG84 
{852 FEG?86 
1853 FEG9SE 
1854 FEAg94 
1855 FEBI9A 
1856 FEG99C 
1857 FEG9A8 
1858 FEGIAS 
1859 FEBQAR 
1868 FEBIAC 
1861 FEG9E8 
1862 FEG9B4 
1843 

1064 

1665 FEG?B8 
1666 FE@9BC 
1667 FEG9C8 


kvs 


BAIL 
can 
FFFF 


LiFCRGH22085 


885890018085 
b7BH2BAA 

AGE 7ERA4 

BB I3RRBBa CES 
5418 
{{FCRA1BBC85 
LF CaRTEaCeS 
{OTRRCR! 

LiF CRAISa085 
ee 

aC ‘00803 
6478 

LiF CRBBLEC85 
1iFCOBR88 C85 
24388545 

eiF CRRA BAR 
A544 
b{B88GAR 
4BFABAGA 
b1GAF BEC 
428! 
885806808095 
b7F8 

E18! 
18388C6! 
8800087 
b18BF CCS 
0288 
gCeaeead 
bbE? 
61688874 
117088818005 
{iF 080188085 
ACB L41424F 8D 
b7iC 
4BFABA52 

b1 GBF BAC 
61888854 
42388556 
21028546 
4COF 2607 

FEF ROS 4E 


42380556 
ACOF 2067 
bOGGFEBA 
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SERVACIA: 


AYTR 


eer 
eel 


SERVI: 


SERVIL: 
SERVICE: 


ABOTSKAC: 
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OC.W SBAZD5 '- IN ZEHNERBLOCK 
OCH = $8099; ‘TAB IN ZEHNERELOCK 
OCW = $0380; ‘CCR IM ZEHNERBLOCK 
ie 


MOVER 2,ACLALCO} 

' TG TEST INT PENDING BIT 
BIST.2 t,ACIAtCOs; «0! LF INTERRUPT COME 
BEQ.W SERVICIE; 


ROVEN.L 28-0275 ,-(A7)5 


i 
BTST.2 Q,ACIALCO; | SEE IF RY INT OR SPECIAL 
BRE PEINTLS RECEIVE CONDITION 
MOVE.B StB,ACTAICO; ' RESET EXTERNAL STATUS INT 
MOVE. $28,ACTAICO; ' END OF INTERRUPT CORMAND 
BRA. W SERVIG 
ROVE.S ACTACA Ce; | GET INFORMATION 
MOVE.2 $33, ACTAUCO; ° EXD OF LNTERSUPT COMMAND 
BOLRL 708 
MOVE.E DByiNTINPUTS [PUT IT IN RAR 


CNPL.3 $83,085 


ENE.S SERVIT; 


HAND LOGK IF 7 WAS *f 


MOVES $f, ACTALCOS 
MOVE. $8,ACIALCCS | DISABLE INTERRUPT 
MOVE.L TOFLAG,O2; =! 02 15 10 SAVE 


BSR PCRLF; 

LEA.L MESSHCR AS; 
BSR POATAY 

CLR.L Bt; 

BTST.B 8, ACLAICO; 
BEQ.S SERVIS; 
ASL.L S04: 
MOVE.B ACLALDA, D8; 
BCLR.L 7,08; 

BSR QUICK; 

ADD.E 08,04; 
CHPI.B $80, 08; 
BNE.S SERVI3; 

BSR PCRLF; 

MOVE.B S${,ACTALCO; | END OF WER SEQUENCE 
MOVE.8 $18,ACIAICO; ' ENABLE INTERRUPTS AGAIN 
CHPILL $41424F20,01; 

BE9.S ABOTSKRC; 

LEA.L NESSIGNO,A5; 

BSR PDATA; 

BSR PCRLFS 

CLR.B INTINPUTS 

MOVE. O2,T0FLAG; =! WAS OLD VALUE 

ROVEN.L (A7)+,08-D2/A5; 

JNP SERRTES; ' IN RAM IS RTE 


' 70 COMPARE FIRST SHIFT 


' THEN ADD HEH CHAR, 


CLR.B INTINPUT; 
MOVEN.L {A7)+,08-D2/A5; 
BRA.W CONTROLC; 


| WRITE POINTER 2 IN CHANNEL A 
S FROM ACIAI 


LAST USER LO-CONFIS 
MOVE.L STANDIO,IOFLAG}! AND IN MCR IS STANDART-19 
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1868 
1849 
1878 
167! 
1872 
1873 
1874 FERQC4 
1075 FEG?C8 
1674 FEQ9CA 
1877 FER9CC 
1878 FE@ICE 
1879 FEBIDA 
1680 FEGID4 
1681 FEG?D6 
1682 FEGIDS 
1883 FE@9DC 
1884 FEAQDE 
1885 FE@9E2 
1886 FEGIES 
1087 
1988 
1889 
1698 FEGIE8 
1891 FEBIEC 
1892 FEAIFA 
1693 FEGQF2 
1694 FEAIF4 
1895 FEQIF8 
1896 
1897 
1698 
1699 FEQIFA 
1168 FEGIFC 
1181 FEGAGa 
1162 FE@AR4 
1183 FEBAGB 
1164 FEBAGC 
1185 FEGAI8 
1166 FEBAL4 
1187 FEGAI4 
1168 FE@AIA 
1189 FEGAIE 
1116 FE@A22 
1111 FE@AZ4 
1112 
{{1J 
1114 
1115 FEGA24 
1116 FEBAZ8 
1117 FEBAZA 
1118 FEGAZE 
1119 FEGA32 
1128 FEGA34 
1121 FEGA38 
1122 
1123 
1124 


kus 


48675880 
338! 
7483 
E338 
E33 
SI CAFFFA 
C143 
5118 
b{8QF C44 
C748 
SiCOFFEA 
AC OF AGaC 
4E75 


B2R8808F 
OCOAROBA 
6582 
SEG 
6880838 
4E75 


457 
4GE7 C000 
1830888) 
S1GGF CA 
16308884 
b{88F (32 
52308806 
4268 
6188F (28 
SiC9FFFA 
4COF 8883 
44)F 
475 


2F 88 
3344 
16308828 
b18GF C18 
Si CIFFFA 
281F 
4E75 
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't# PRINT SOME NIBBLES 44 
'# NUMBER OF NIBBLES IN D1.L 8 
's# HIBRLES IN D@.L, PRINTED FROM THE LEFT #2 


PRINIE: MOVEM.L 02-03,-{A7); 


PRINIE2: 
PRINIBI: 


‘#4 CONVERT HEX-NIBBLE IN 08.8 TO ASCII IN 06.8 tt 


PACK: 


PACK{: 


SUBQ.L fy 04; 
MOVES.L 3,02; 
LSL.L 1,08; 
ROXL.B 1,03; 
DBF 02,PRINIBI; 
EXG.L 08,035 
BSR.S PACKS 

BSR OUTCH; 
EXG.L 03,08; 
DBF D1 ,PRINIB2; 
MOVER.L (A7)+,02-D3} 
RTS§ 


' ADJUST COUNTER 


ANDI.8 $F 508; 
CHPI.B $A,08; 
BCS.5 PACKS; 
ADDG.B 7,08; 
ADDI.8 $38,085 
RTS; 


'## PRINT <CR>,<LF> #4 


PCRLF: 


PCRLFA: 


MOVE.W SRy-(A7)§ 

MOVEM.L DA-Di,-{A7)5 

MOVE.B $0,085 

BSR QUTCH; 

MOVE. $A, 08; 

BSR QUTCH; 

NOVE.W 6yD15 

CLR.B 08; 

BSR QUTCH; 

DBF Di,PCRLFI;! WAIT AND SEND SOME @ 
MOVEN.L {A7)+,D@-D1; 

MOVE.W (A7)+, CCR} 

RTS; 


'## PRINT SOME BLANKS, NUMBER IN Di ## 


PBLANK: MOVE.L 08,-(A7); 


SUBQ.W {,01; ' ADJUST NUMBER 
MOVE.B $28,085 


PBLANK{: BSR QUTCH; 


NOVECOM: 


OBF D1 ,PBLANK{; 
MOVE.L (A7)+,08; 
RTS; 


ee 
0 Ce = oe A 


& co Benn Si 


(134 FEGAME 
115 FEGAA! 
1135 FEAAMA 
(137 FEAASC 


449 
didi 


{159 FEAASS 
{144 
tdi 
if42 FEBAS? 
if4j FEBASE 
ii44 
1145 
1146 
1147 FEQASS 
1148 FEGASA 
1149 FEBASC 
1158 FE@AG? 


4aCea 
bicl 


{152 FERAbS 
1153 FE@AbS 
if4 TEAASS 


‘colt sw 
a4Ch Pers 
bog FESAGA 


1154 
{157 FESAGE 
1158 
1465 
{168 FESATE 
{164 FEMATS 
152 FEAATS 
{143 FERATA 
{164 Feeare 
465 CEBATE 
1165 FERARZ 
{167 FEAAS4 
T1468 FERAGE 
1149 
i178 FEBABA 
{174 
1172 


ary 


{174 FEBABC 
1175 rEBABE 
1176 FEBAI2 
1177 FEBA%S 
1178 FEBA?S 
1179 FEBAIA 
1186 FEBAIE 
1181 FEGAAG 


5618 


B59 
AJA 


sweet 


284i 


1509 
at 
5CFA 
AIC AAAS 


6312 
BORCARRRAAFF 
bEWA 


1208 
B55 
bCFA 
AIT Ae4 


PELLSED) 
S3ef 
ites 
béhE 
f24e 
3 {BOAZE2 
bond 


950A 
61866528 
9(66026) 
OTE 
5380 
$1800286 
6686 
98898088 
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352 READTREE; 
BNE ENDMOVE; 


CHPAL AL A23 
BLS ENDFILL; 
NOVE.L DB)Ad; | 7 


MOVE.D iAL)+, (AS) 4; 


CHPLL AL,AZS 
BSE OVELSOP; 
ORI.8 4,0CR; 
ENDACVE: 
RTS; 


BSR READT SEES 
BNE ENDFILL: 
' AL FROM 
' A2 10 
' 08 Filer 
CHP.L AL A2s 
BLS ENDFILL; 
CMP.L SPF ,08; 
BOT ENOF ILL; 


FILLLGOP 
MOVES DO, (AL) +s 
OMPL AL wads 
Boe FILUL SOP; 
ORIG 4,008; 


ENDF YUL: 
RTS: 


sCanwe ° 
REAGT SES: 


a 


a. 


mac Us 
rey sa KD 


Leap, 


} 
¥ 


OO =m OF wa Me 10 iO OF 


oom 2 On 
= 


ENDGTQEE: 


b= | 
— 
a 
—@e 


't# OPEN MEMORY #4 


MEMORY: SUBA.L A2,A2; | AZ IS MEMORY POINTER=3 INITIAL DEFAULT 


BSR SEANEYT; 
CHPI.B $80,085 
BEQ.S MEMORY: 
SUBG.L 1,A5; 
BSR READHI: 
BNE.S MEMORY! ; 


BCLR.L 8,08; ' ONLY IN WORD-SIZE 


SAM O8K MONITOR VERSION 2.3 


13.95.85 


1182 FEBAAS 
1183 FEQAAS 
1184 FE@AAA 
1185 FE@AAC 
1186 FEGAAE 
1187 FEQABA 
1188 FEGAB4 
1189 FEGABS 
1198 FE@ABC 
{191 FE@ABE 
1192 FE@ACA 
1193 FE@AC2 
1194 FEGACS 
1195 FEBACA 
1196 FEGACE 
1197 FE@AD2 
1198 FEBAD4 
1199 FEGADS 
1288 FEBADA 
1281 FEGADC 
1262 FEGAE@ 
1203 FE@AE2 
1264 FEBAES 
1285 FEGAE8 
1206 FE@AEC 
1267 FEGAEE 
1288 FEBAF2 
1209 FEGAF4 
1216 FEGAFS 
1211 FEQAFS 
1212 FEGAFC 
1213 

1214 

1215 FE@AFE 
1216 FE@B@2 
1217 FE@BA4 
1218 FEGBG6 
1219 FE@BGS 
1228 FEGBBA 
1221 

1222 FE@BAC 
1223 FE@B18 
1224 FEABI4 
1225 FE@BL6 
1226 FE@B18 
227 FE@BIA 
1228 FEGBIE 
1229 FEGB22 
1236 FE@B26 
1231 FEGB28 
1232 FEBB2¢ 
1233 

1234 

1235 FEGBIG 
1236 FEGB34 
1237 FE@BI4 
1238 FEABIA 


kws 


2448 
6198FF52 
288A 
7286 
E188 
b{G8FF {2 
16308828 
b1@8FB84 
3812 
4849 
7204 
6{80FFA0 
18308028 
6{80FB74 
6188FAZ8 
2AaC 
181) 
6C808830 
6722 
(800823 
b74E 
oceneeed 
6758 
8CAARB5E 
6758 
aCeagasi 
6682 
4E75 
763F 
6180FB44 
5BA8 


61808252 
bOF2 
3488 
BOSA 
6682 
689A 


18308828 
61G8FB2E 
5822 
4840 
7264 
b{BBFEA8 
16308028 
b1GQFB1C 
7A3F 
61 8GFB14 
GG0FF78 


61998278 
b6C8 
aggaeeae 
2448 
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MEMORY: 


HEMORY2: 


MEMNEWY: 


NEMERR: 


NERNEWA: 


SAM 68K MONITOR VERSION 2.3 


MOVEA.L DO,A2 ; 

BSR PCRLF§ 

MOVE.L A2,08; 

MOVER.L 6,04; 

ASL.L 8,00; | 
BSR PRINIBS ' PRINT THE ADDRESS IN & NUMBERS 
MOVE.B $28,085 

BSR OUTCH; 

MOVE.W (AZ) 085 

SWAP 085 

MOVEG.L 4,04; 

BSR PRINIBS 

MOVE.B $28,085 

BSR QUTCH; ' AND THE YALUE OF ADDRESS 
BSR INLINE; ' GET COMMAND 
MOVEA.L A4,A5; 

HOVE.B (A5)+,085 

CNPI.B '=" DQ; 

BEQ.S MEMNEWV; 

CHPI.B #08; 

BEG.S MEMNEWA; 

CMPI.8 $80,085 

BE@.S MEMNEXT; 

CHPI.B '*’ 08; 

BE@.5 MEMLOWER; 

CHPI.B '@’ 08; 

BNE.S MEMORY2} 

RTS; ' THIS 5 END OF OPEN 
MOVES.L ‘7,08; 

BSR OUTCH; 

BRA.S MEMORY! ; 


BSR READHX; 
BNE.5 MEMORY2; 
NOVE.W 08, (A2); 
CMP.W (AZ)+,08; 
BNE.S MEMERR; 
BRA.S MEMORY{; 


NOVE.B $28,085 
BSR OUTCH; 
MOVE.W -(A2) 08; 
SWAP DB; 
MOVES.L 4,04; 
BSR PRINIB; 
MOVE.B $28,08; 
BSR OUTCH; 
MOVEG.L ‘7,08; 
BSR OUTCH; 
BRA.W MEMORY; 


BSR REAGHY; 
BNE.S MEMORY2; 
BCLR.L 8,005 
HOVEA.L DO,A2} 


{239 FEBBSC 
1248 
1241 FESS 
1242 FEAB4A? 
ean 
i244 FEBRSE 
1245 1S FEGR4§ 
{244 
6447 
1248 
1249 
{259 FEBBSC 
125! FEARSa 
1232 FEABS4 
253 


1754 
12535 
1254 FESBSS 
{257 FEARSA 
1258 


ACG 
éi? 


1268 
{Zhi FEGESC 
1262 FEGRbE 
{263 
{264 
{285 
1266 FEBBAZ 
{247 FEBBGE 
1268 

174) 
1079 
127{ FE@BA8 
1272 FEBBAC 
1273 
1274 
1275 
1274 FE@BAE 
{277 FEGB72 
1278 FEGB74 
1279 FEBB74 
{288 FEGB78 
1281 FEAR7A 


1282 FEGB7C 


1283 FEABSE 
1284 FEGBR4 
1285 FE@R8S 
1286 FERBSA 
1287 

1288 

1289 

1298 FEBBSC 
1291 FEGRoA 
1292 FEABS4 
1293 FEGB94 
1294 FEBRA 
1295 FEBRIE 


kw 


bEREFF 48 


3484 
bRBRFF A? 


358A 
bRBBFFS! 


24200938 
OBI CBARE 


b8i¢ 


1AgCROGF 
baLS 


18308018 
o8i8 


185C80t f 
bAAA 


19300812 
bRe4 


4088038 
4287 
{£8 
EJF 
287 
EJ8F 
4{F3Q55¢ 
61 80F 788 
1810 
AC8ABBID 
boi4 


ber 774 
61886103 
6628 
21887988 
AICAARA 
4E75 
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BRA.W AEMORYS; 


REMNEXT: ADDA.L 2,AZ; 


BRA.W MEMORY! 


'## DISPLAY ADDRESS REGISTER #8 


ADRES: 


SUBI.B $38,085 
ADD. 8,08; 
BRA DATRESI; 


#8 DISPLAY SUPERVISOR-STACKPOINTER #8 


STACKP: 


MOVE. i5,08) § = Al 


#4 DISPLAY USER-STACKPOINTER #4 


USTACKP: 


AQVE.E 16,083 


STATREG? ROVE.B 17,085 


fst GISPLA 


PROCOUN: 


BRA.S GATRESH 
PROGRAM COUNTER 44 


MOVE.2 18,08) 
BRA.S DATRESL; 


'$# DISPLAY DATA-RESISTER #4 


DATRES: 


DATRESI: 


SUBI.8 $38,08:! CONVERT NUMBER 1 HEX 
CLR.L D7; 
NOVE.B 08,073 ' 07 CONTAINS OFFSET 


LSL.L 1,07; | OFFSET#2 
MOVE.L 07,06; 
LSL.L 1,07; | OFFSET#4 


LEA.L REGS,AG}' BASE OF RESISTER-BLOCK 
BSR RERBLANK; 

MOVE. (A5}+,0B5! SET CHAR 

CHPI.B '=',0B; | CHANGE REGISTER? 
BNE.5 DATRESS; | NO 


' CHANGE REGISTER + 


DATRES{I1: a B 4, CERS 
GATREG2: 


BSR REMBLANK: 
BSR REACH; 
BNE DATRESZ; 
MOVE.L G2, B(AG,D7.W)3! STORE VALUE 
' Z={2 NO ERROR 
RSs ' 7292 NO ERROR 


' SET VALVE 


13.85.85 


1296 

1297 

1298 

1299 FEQBAA 
1388 FEBBAS 
1301 FE@BA4 
1382 FEQBAA 
1383 FEGBAE 
1384 FEGBB2 
1305 FEGBB4 
1386 FEBBBS 
1387 FEGBBC 
1368 

1389 

1318 

{31f 

1312 FEGBBE 
1313 FEABC? 
1314 FE@BCS 
1315 FEGBCA 
1316 FEGBCE 
1317 FEABD2 
1318 FEGBD4 
1319 FEGBDA 
1328 FE@BDE 
1321 FEBBES 
1322 FE@BE2 
1323 FEABES 
1324 FEBBES 
1325 FEBBE8 
1326 FEBBEC 
1327 FESBFA 
1328 FEBBF4 
1329 FEABF8 
1338 FE@BFA 
1331 FEOBFE 
1332 FEGCHG 
1333 FEACE? 
1334 FEACH4 
1335 FEGCH6 
1334 FEaCes 
1337 FEacea 
1338 FEGCaC 
1339 FEQCBE 
1346 FEGCIO 
1341 FEaC{2 
1342 FE@CL4 
1343 FEQCLS 
1344 FEGCIB 
1345 FEACIC 
1344 FEBC28 
1347 FEBC22 
1348 FEGC26 
1349 

1358 

135! 

1352 


kv 


8C88888D 
bOF8 

43FAG788 
S031 6808 
b188F IFC 
288 

20387888 


b1QOFEGA 


680C 


b1QAFEIA 
SBF ARBD2 
61 AGF 985 
b{BQFEZE 
ABFAGBDA 
6188F97A 
b{AGFEZ2 
2£ 588558 
7442 
742) 
E29F 
6482 
7828 
6198FA54 
Si CAFFF2 
b{8BF E88 
bi GOF BFA 
2A4C 
aCi5eAad 
6722 
$283 
7228 
742) 
TAL2 
TEFF 
1810 
3287 
B4ae 
6786 
8288 
6680 
BF C3 
Si CDFFFS 
21038558 
9088 
b184FD04 
4E75 
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'# DISPLAY REGISTER # 


DATREGI: CHPI.B $00,085 ' COMES <CR>? 
BNE.S DATREG2; ' NO: ERROR 
LEA.L REGTAB,AL;! RESISTERNAMES 
MOVE. W ACAL,0G.M) 08; 
BSR QUTREGS; =! PRINT REGISTERNANE 
MOVEG.L 8,01; | 8 NIBBLES 
MOVE.L 8{AG,07.W) 085! GET VALUE 
BSR PRINIB; ! PRINT IT 
BRA.S DATREGI1; 


‘## DISPLAYS THE LIST OF REGISTERS TO BE SHOWN #4 
LISTREG: BSR PCRLF; 
LEA.L MESDATEN, AS; 
BSR PDATA; 
BSR PCRLF; 
LEA.L MESNUMM, AS; 
BSR PDATA; 
BSR PCRLF; 
MOVE.L RESFLAG, 07; 
MOVEG.L 18,023 
LISTREGZ:MOVES.L $20,085 | - 
ROR.L 1,075 
BCC.S LISTREGL; 
MOVES.L $28, D8; ! + 
LISTRES{:BSR QUTCH; 
OBF §2,LISTREG2; 
BSR PCRLF; 
BSR INLINE; 
MOVEA.L A4,A5; 
CHPI.B $80, {A5); 
BEQ.S LISTREGE; 
CLR.L 03; 
MOVES.L $2B,01; ' + FUER AN 
MOVER.L $20,02; | - FUER AUS 
MOVES. 18,05; 'I5T SCHLEIFENZAEHLER 
AQVEQ.L -1,073 
LISTRE?7: MOVE.B (A5)+,00; 
ADDG.L 1,075 
CHP.B 06,025 
BE@.S LISTREGS; 
CHP.B 08,01; 
BNE.S LISTREGE; 
BSET.L 07,03; 
LISTREGS:DBF D5,LISTRE7; 
HOVE.L 03, REGFLAG; 
SUB 08,08; 
LISTREGE:8SR PCRLF; 
ATS; 


! ONLY LOOKING 


'## ERZEUGT EINE LISTE DER ACTIVIERTEN [/O-KANAELE #4 


13.85.85 


1353 
1354 FEAC23 
1385 FEBC2C 
1354 FEGC38 
1357 FEQC32 
{358 FEACT4 
359 FEBCI8 
{348 FEAC3C 
1361 FEQCJE 
(362 FEBCA 
1363 FEACS 
{344 FEQCSS 
1365 FEGCSL 
1344 FE@CSA 
1367 FEBCS? - 
{368 FE@CSS 
1349 FEACSS 
1378 FEACSC 
(TTL FEBCAA 
(372 FEACG? 
{373 FEQCEA 
1374 FEACSS 
1375 FEBCER 
1375 FEBCSA 
1377 FEACEE 
(378 FEACT? 
(379 FEQC7S 
{388 FEGCTA 
(381 FESCTE 
1382 FEACEA 
{383 FE@CB? 
1384 FEQC84 
1385 FEBCBS 
{384 FEQC8S 
1387 FEACBA 
1388 FEACBC 
1389 FEACRE 
(398 FEACIR 
1391 FEAC9? 
1392 FEBC94 
1393 FEQC% 
1394 FEACSS 
(395 FE@CIC 
1394 FEACAR 
1397 FEQCAS 
1398 FEACAE 
1399 FEACAA 
1408 
146i 
149? 
1483 
{404 
{485 FEBCAC 
1406 FEACBA 
{407 FEACBA 
{408 FEOCBR 
{409 FEBCBA 


kv 


2E 388546 
G1BRF DCC 
720F 
7A4F 
S182F ABA 
SICSFFFA 
7Aa9 
720F 
b{BGF SF 
SICOFFFA 
5{90F 088 
4BFAG872 
2C40 

b1 BEE BFA 
2A4E 
b1aaF ars 
b(eRF DC 
7ALF 
7420 
EZ9F 
6482 
7828 
ALABFID4 
SICAFFF? 
SHH DBS 
{RGF 878 
Aci 4eeat 
b726 
7228 
7420 
T6LF 
4284 
4285 
181¢ 
B48 
6786 
B298 
bbt? 
2905 
3284 

SI CBFFFA 
21058546 
21058544 
9888 
{ARF O52 
4E75 


51888384 
acangeed 
67898876 


41880296 


Diskasseabler 


TQLIST: 


IOLISTI: 


IOLIST4: 


IOLISTS: 


1OLISTS: 


TQLISTE: 


lee MERGR 


DUMPMER: 


Page: 26 


MOVE.. IOFLAG.D75 
BSR PERLE: 
MOVES.L 15,045 
MOVES.L $4F DB; 
BSR OUTCH; 

DEF 81, 1OLISTI; 
MOVES.L $49,085 
MOVES.L 15,04) 


’: BSR QUTCH; 


DBF 61, 10LIST2s 
BSR PCRLE} 

LEA.L MES{234,A53 
MOVEA.L A5.Ab3 
BSR PDATAS 
MOVEA.L AG,AS: 
BSR PDATAY 

age PCRLFs 


AQVES.L dt yey 


S MOVEG.L $20,083! - 


ROR.L iybis 

BC0.5 LOLIST4; 
MOVES.L $28,085! + 
BSR GUTCH; 

DBF O2,10L1ST2; 
BSR PCRLE 

BSP INLINE; 

CHPL.LE $80, (43; 
BEG.5 IOLISTE; 
MOVES.L $28,013! + 
MOVES.L $20,02;! - 
MOVEG.L 31,033 
CLR.L O4} 

CLR.L O55 

MOVED (Ad) +08; 
CHP.B 08,025 

BES.5 TOLISTS: 
CAPLB Do.dt; 

BRE.S IOLISTE: 
BSET.L 04,053 
AGG. 1504; 

ORF PI,IQLISTS 
MOVE.L 05, 1GFLAG; 
MOVE.L D5,LASTIO; 
SUB 08,08 3 

BSR PCRLF; 

ATS} 


YOUMP FRON-TO iN HEX+ASCII #4 
BSR SEANEXTS 

CMPILE $80, 08; 

BE9.W DUMPEND; 

SUBQ.L 1.85; 

BSR REAQHI; 


SAM 48k MONITOR VERSION 2,3 


13.85.85 


1410 FEOCBE 
1414 FE@CC2 
1412 FE@CC 
{413 FERCCE 
1414 FEBCCA 
1415 FE@CCC 
1416 FE@CCE 
{417 FE@CDA 
1418 FEBCD4 
1419 FEBCDS 
1428 FEOCDA 
1421 FEACDC 
1422 FEACES 
1423 FE@CE2 
1424 FEACES 
1425 FEBCES 
1424 FE@CEA 
1427 FEBCEC 
1428 FEACEE 
1429 FE@CF2 
1430 FEACF4 
1431 FEACFS 
1432 FEACFC 
1433 FEPCFE 
1434 FE@De 
1435 FEGDR2 
1436 FESDAS 
{437 FERDBA 
1438 FEADRE 
1439 FEADIG 
1440 FEADL4 
1441 FEADLS 
{442 FEADLA 
{443 FERDLE 
1444 FERD2A 
{445 FERD24 
1446 FEQD26 
1447 FE@D2C 
1448 FERD3O 
1449 FEQD32 
1450 FEAD34 
1451 FEAD34 
1452 FEQD38 
1453 FEAD3C 
1454 FEQDIE 
1455 FE@D42 
1456 FEBDAS 
1457 FEQDAA 
1458 FEADAC 
1459 FEADS@ 
1460 

14a! 

1462 

1463 

14b4 

1465 

1466 


kus 


bo88888C 
2448 
6198808C 
6782 
208A 
2648 
268A 
6180F028 
7268 
G{BQF CEC 


16323888 
E698 
3283 
1282 

61 88F (D4 
726! 
6168F 038 
80830018 
6DE6 
4283 
7283 
b188FD22 
{6323888 
(600828 
6086 
CERRE7E 
oF 84 
1030885F 
5{8BF924 
3283 
80230818 
6DE8 

DSF CAGGG8818 
44380556 
668C 
B7CA 
6C98 
9888 
b1B8F CCA 
4€75 
6168F 958 
6{80F954 
8088908) 
6682 

bi 8GF CAC 
4£75 
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DUMPHZ4: 
QUMPHZ: 


DUNPHS: 


QUMPM4: 


DUMPS: 
DUAPG: 


DUMPWET: 


QUAPEND: 


SAM 68K MONITOR VERSION 2.3 


BNE.W OUMPEND;! BECAUSE ERROR 
MOVEA.L 08,A2;' IN AZ IS FROM VAL. 
BSR READHX; 

BEG.S DUMPMZ{; 


MOVE.L A2,08; '! BECAUSE THERE WAS NO AJ INPUT 


MOVEA.L DB,A3;! IN AI IS 10 
MOVE.L A2,08; 

BSR PCRLFs 

HOVEG.L 8,D1; 

BSR PRINIB; 

MOVES.L 4,045 

BSR PBLANK; 

CLR.L DB § 

CLR.L 03; 

MOVE.B @1A2,03) 085 
ROR.L 8,08; 

ADDG.L 1,03; 

MOVES.L 2,045! TWO NIBBLES 
BSR PRINIB; 

MOVEG.L 1,01; 

BSR PBLANK; 

CHPI.B 16503; 

BLT.S DUMPM35! ALSO PRINT 16 HEX.BYTES 
CLR.L 035 

MOVES.L 3,01; 

BSR PBLANK; 

MOVE.B 8{A2,03) 06; 
CAPI.B $28,005 

BLT.S DUMPS; 

CHPI.B $7E, D8; 

BLE DUNP4; 

MOVE.B $5F,08; 

BSR QUTCH; 

ADDG.L 1,03; 

CMPI.B 16,033 

BLT.S DUMPM4;! A FEW MORE ASCIIS 
ADDA.L 16,A2; 

TST.B INTINPUT; 

BNE.S DUMPWEI; 

CHPA.L A2,A3; 

BGE DUMPMZ;! NEXT LINE 
SUB.L 08,08; 

BSR PCRLF; 

RTS; 

BSR INCH; 

BSR INCH; 

CMPI.B $80,08; 

BNE DUMPNZ; 

BSR PCRLF; 

RTS; 


‘## READ UP T0°8 ASCII'S AND CONVERT #2 
'## THEM TO HEX, RESULT IN 08.L i 
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1467 FEGES2 
1448 FEADSS 
1469 FEGD58 
1478 FEQDSA 
1471 FEADSE 
1472 FE@DS2 
1473 FEADS4 
1474 FEGDGS 
1475 FEQDOA 
1476 FEADOC 
1477 FEGDGE 
1478 FEAD?72 
1479 FEGD74 
1488 FEROS 
1481 FEGD7A 
1482 FEBD7E 
1483 Feeta2 
1434 

1485 Feapa4 
1486 FEGDS8 
1487 FEGD8A 
1488 FEaDSC 
1489 FEGDIA 
1499 FEBD94 
1494 

1492 

1493 

1494 

1495 FEAD%S 
1496 FEAD9S 
1497 FEALIC 
1498 FE@DIE 
1499 FEADA2 
1508 FEADA4 
1581 FE@DA8 
1582 FEBDAA 
1583 FEADAE 
1584 FEGDES 
1565 FEADB4 
1586 

1587 

1588 

1589 FE@DBS 
1318 FE@DBA 
{Si FE@DBC 
1512 FE@DCA 
1513 FE@DC? 
1344 FESDC4 
1315 FEADCA 
1516 FEBGCA 
1317 FEGDCE 
1518 FEABL2 
1519 FESDDS 
1528 FEBDDA 
1521 FE@DDC 
1522 FEBDES 
1523 FE@DE4 


48675808 
$280 
424i 
OL @8F5A4 
54308867 
1010 
b1Bne1 C$ 
bo1A 
E98! 
8286 
SL CAFFF? 
41908022 
bb84 
2881 


— HOICBRE4 


ACF GRAS 
475 


ACB28887 
5380 
5OES 
ACDFAGRS 
B23C88F8 
4E75 


1610 
aceagaal 
6746 
9C888G78 
5718 
8088082) 
678A 
ACGBGA2C 
6794 
A23CBGFE 
4E75 


61809228 
5580 
b1BQFFI4 
8782 
4288 
2088 
{RRF C32 
ABFAROI? 
b{OGF77e 
G1 G0F E26 
b1G8F 718 
b6EA 
4BF 88628 
b18G81FA 
b6E8 


/ 


SAM 48K MONITOR VERSION 2.3 


READHX: MOVEN.L 01-D2,-(A7)5 
CLR.L 08; 
CLR.L O45 
BSR REMBLANK;! REMOVE BLANKS 
MOVE.W 7,025 ! MAX. 8 ASCII’S 
READHX@: MOVE.B (A5)+,08;' SET CHAR 
BSR ASTOR; 
BRE. READHX?; 
ASL.L 4,045 
OR.L D8,01; 
DBF D2, READHYAS 
READHX3: BSR WHATFO; 
BNE READSHY; 
MOVE.L 01,06; 
QRI.B 4,CCR; =| 2=12 NO ERROR 
READSHX: MOVEM.L (A7)+,D1-D2; 
RTS; 


' CORES " " OR <CR)? 
' 7283 ERROR 


READHY9: CHPILB 7,02)! ERROR IN FIRST CHAR? 
SUBQ@.L £,A5;! AQJUST POINTER 
BNE.S READHY33! NO: OK 
MOVEN.L (A?) +, 01-025 
ANDI.B $FB,CCR}! YES: ERROR 
RTS; 


's# LOOK IF BLANK OR <CR> OR - OR , COMES UP 
'## 2={2 YES, 7=8: 0 H 


WHATFO? MOVE.B (A5)+,085 

CHPI.B $80,005 

BEG.5 WHATFOI; 

CHPI.B $20,085 

BEQ.S WHATFOL; 

CHPI.8 $20,080)" =- 

BEG.S WHATFOI; 

CMPI.E $20,08;! =, 

BEG.5 WHATFOL; 

ANDI.B $FB,CCRS! 7=82 ERROR 
WHATFOLRTS5 ' 1=t9 NO ERROR 


'## LOAD MOTOROLA-CODE #4 


HOLQAD: BSR SEANEYT; 
SUBS. 1.A5; 
BSR READHY: 
BES.S AOLONOFS 
CLALL D8; 
MOLONGF HOVE.L 08,08: 
MOLQANER:BSR PCRLFs 
LEAL MESFILED,AS; 
BSR POATAS 
BSR PCRLF; 
BSR INLINE; 
BHE.S MOLDANER; 
LEA.L CONBUFF ,A5; 
MOLOAGS:BSR LOADSYN 3 ' SYNTAX COMANDLINE 
BNE.S MOLGANER; 


be 
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1524 

1525 FE@DE6 
1524 FEGDEA 
1527 FEADEC 
1528 FE@DFS 
1529 FEBDF4 
1538 FEGDFS 
1531 FEGDFA 
1532 FEBDFE 
1533 FEGDFE 
1534 FEGES2 
1535 FESER4 
1536 FEGEGS 
1337 FEBEGA 
1538 FEGEGE 
1537 FEBEL& 
1548 FEREL4 
1541 FEGELS 
1342 FEGELC 
1543 FEGELE 
1544 FEBE22 
1345 FEGEZ4 
1546 FEQE24 
1547 FESEZ8 
1548 FEGE2¢ 
1349 FEBEZE 
1558 FEBES2 
1551 FEGES4 
1552 FEGESS 
1553 FEGESA 
1554 FEBESE 
1555 FEGE42 
1556 FEGES4 
1557 FERESS 
1558 FEGE4C 
1559 FEBES@ 
1568 FEGES2 
1561 FEGESS 
1562 FEAES8 
1563 FESESA 
1564 FEGESE 
1365 FEGES2 
1566 FEGES4 
1567 FEGESA 
1568 FEGEbE 
1569 FEGE72 
1578 FEGE74 
1571 FEGE7A 
1572 FEBE?C 
1573 

1574 FEGE7E 
1575 FEGE82 
1576 FEGE84 
1577 FEGE88 
1578 FEGEBA 
1579 FEGESC 
1588 FEGEI8 
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ace4aea? 
6684 
68800858 


SAM 8K MONITOR VERSION 2.3 


'### LATER THIS 15 THE POINT 10 60 TO NINI-DER 


CMPILE 2,04; 
BNE QTHERLOA: 
BRA.W MINILOAD; 


2{F8O546854A OTHERLOASMOVE.L IOFLAG,LASTIO; 


4483 
671A 
4288 
8808 
21088546 
3383 
1618 
6190F 838 
SI CBFFFE 
7880 
6{88F 82E 
4288 
DSbCaganeaia 
8908 
21088546 
4287 
4482 
6786 
61888128 
4287 
b18GF 868 
4284 
0888853 
boF 4 

61 B8F 85C 
C8088! 
b73A 
(888832 
67888894 
0888838 
6788 
8008839 
6782 
6804 
b188F 83C 
6888880 
bbFé 
21F8A54A0546 
b{ AGF BSE 
4BFAQ5S93 
bL GBF ODA 
6{8@F 88? 
9888 
4€75 


61888842 
aCehe8e3 
b7A6 
3988 
2688 
61800034 
E188 


TST.B 03; | IF THERE IS A MESS. TO HOST 
BEQ.S NOHONESS; 

CLR.L 08; 

BSET.L 05,00)! 15 QUTFLAG 

MOVE.L 08, 10FLAG; 

SUB@.L 1,035 


MOLOADI2°MOVE.B {A3)+,005 


BSR OUTCH; 

DBF 03, ROLOADI2; 

MOVES,L $0, 08; 

BSR OUICHS! NOW COMAND 1S TRANSMITTED 


MONOMESS:CLALL 08; 


ADD.L 16,04; 
 BSET.L 04,085 
MOVE.L D@,IQFLAG;' IS INCHANAL 
CLR O73 
TST.B B25 
BE@.5 MONOHEAD; 
BSR FINDHEAD; 
CLR O73! IS FIRST ZERO FOR OFFSET 


MONOHEAD:BSR INCH; 


CLA.L 043" IS CHECKSUM 
CHPI.B ’S" 500; 
BNE.S MONOHEAD; 
BSR INCH; 
CHPI.B 4" ,003 
BEQ.S READS! | 
CHPI.B '2" 083 
BEQ.W READS2; 
CHPI.B ‘8’ 003 
BEQ.S REACENDs 
CHPI.B °9° 8; 
BEQ.S READEND; 
BRA MONCHEAD; 


READEND:BSR INCH; 


CAPI.B $80,085 

BNE.S READERD; 

MOVE.L LASTIO, 1OFLAG; 
BSR PCRLF; 

LEA.L MESSEND,A5; 

BSR PRATAS 

BSR PCRLFS 

SUB D8, 08; 


MOLOADERS RTS + ' ERROR 
READS{: BSR READ2HXs! READS St RECORDS 


CHPI.B 3,08; 
BEQ.S NONOHEAD; 
SUBQ.L 4,8; 
ROVE.L 00,03; 
BSR READ2HK; 
ASL.L 8,085 
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1581 FERE92 
1582 FERED 
1583 FEGE98 
1584 FEBEDA 
1585 FESES¢ 
1586 FEREE 
1587 FEGEAA 
1588 FEBEA2 
1589 FEBEA4 
1598 FEGEAS 
1591 FEGEAS 
1392 

{593 FEBEAA 
1574 FE@EAE 
15395 FEGERR 
1596 FEBEE4 
1597 FE@EBS 
1598 FEBEBC 
1599 FESEBE 
1608 

1681 FEBEC? 
1682 FEREC4 
1683 FEGECS 
1684 FEBECA 
1685 FEBECC 
1686 FEBECE 
1687 FEGEDS 
1688 FEGED2 
1669 FEGEDS 
1618 FEBEBS 
1611 FEBEDA 
1612 FEBEDC 
1613 

1614 FEGEDE 
1415 FEGEE2 
1616 FEGEES 
1617 FESEEA 
1618 FEBEEC 
1619 FEBEEE 
1628 FEGEF2 
1621 FEGEF4 
1622 FESEFS 
1623 FEGEFA 
1624 FEGEFC 
1625 FE@FA2 
1626 FEGFG4 
1627 

1628 

1629 

1638 FEGFG6 
1631 FEGFG8 
1632 FEGFOA 
1633 FEGFIG 
1634 FEGFL4 
1635 FEGFI8 
1636 FEGFIC 
1637 FEGF28 


kys 


2488 
61800820 
§449 
4A87 
6618 
TES! 
4A86 
182 
9082 
0486 
2A42 


61888016 
1AC8 

Si CBFFFS 
6188880( 
aCO4F FFF 
5648 

GBAUFFSE 


4281 
4288 
b190F 708 
b{5E 
£988 
5288 
4288 
6{88F7C4 
6152 
8841 
0888 
4E75 


OL 98FFE2 
gCeaeee4 
67 B8FF 46 
5B88 
2688 
b188FFO2 
E18@ 
2468 

G1 GBFFCA 
8448 

CAB CAQRGFFFF 
E182 
b88E 


288) 

7268 

21F 865448546 
OL PRFAES 
b{GQFAAE 
4BFAG49D 
b{GGF ADC 
b180F 42¢ 


Diskassemoler Page: 


38 SAM S8K MONITOR VERSION 2.3 


NOVEL 28,02) 


READS{2:85R READZHY;' 1S SECOND ENTRY FROM S2-REC 


OR.W 98,02; 
TST 07; 

BNE.S READS; 
HOVES.L 1,07; 
TST 043 

BEG.5 REAGSI3; 
SUB.L 02506; 


REAGSIS:ADD.L 05,023 


MOVEA.L D2,A5;! POINTER (PC) 


READMORE BSR READZHY; 


MOVE.B DG, iA5) +5 

DBF O3,READMORE;! GET REST OF LINE 
BSR READZHX; 

CHPI.B -1,04; 

BNE READSERR; 

BRA.W MONQHEAD; 


READZHKSCLR.L DL; 


READS?: 


CLA.L 08: 

BSR INCH! SET FIRST CHAR. 
BSR.S ASTOHY; 

ASL.L 4,085 

MOVE.W 08,04; 

CLR.L 0B; 

BSR INCH; 

BSR.S ASTOHY; 

OR.W 01,08; 

ADD.B 06,043! CHECKSUM AUFADDIEREN 
RTS; 


BSR READZHX; 

CMPLB 4,085 

BE9.W RONGHEAD; 
SUBE.8 5,08; 

MOVE 08,03; 

BSR READZHY; 

ASL.L 8,085 

MOVE.L 08,025 

BSR READZHY; 

OR.W 08,02; 

AND.L $HQBQFFFF 02; 
ASL.L 8,02; 

BRA.S READSI2;! AND NOW LIKE St 


READSERR:MOVE.L A508; 


MOVES.L 8,01; 

MOVE. LASTIO,IOFLAG; 
BSR PCRLF; 

BSR PRINIB; 

LEA.L MESSCHER,A5; 
BSR PCRLF; 

BSR PDATA; 
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1638 FE@F24 
1639 FEGF28 
1648 

1644 

1642 

1643 FEQF2A 
1644 FEGF2E 
1645 FEGF3@ 
164 FEGF34 
1647 FEGF36 
1648 FEGFIA 
1649 FEGFIC 
1658 FEGF4@ 
1651 FE@F42 


1652 FEGF& | 


1653 FEGFaC 
1654 FEGF5@ 
1455 

1656 

1657 

1658 FEGFS2 
1659 FEGF54 
1666 FE@F5A 
1661 FEGFOO 
1662 FEGF44 
1663 FEGF68 
1664 FEGFSC 
1665 FEGFOE 
1666 FEGF7@ 
1667 FEGF72 
1668 FEGF76 
1669 FEGF7A 
1678 FEGF7E 
1671 FEGF&@ 
1672 FEOFB4 
1673 FEAF&8 
1674 FEGF8C 
1675 FEGF&E 
1676 FEGF92 
1677 FEGF96 
1678 FEGF98 
1679 FEGF9A 
1688 FEGF9C 
1681 FEGFIE 
1682 FEGFAG 
1683 FEGFAS 
1684 FEGFAS 
1685 FE@FAA 
1686 FEGFAE 
1687 FEGFB2 
1688 FEAFBS 
1689 

1698 

1691 

1692 FE@FB8 
1693 FEBFBC 
1694 FE@FBE 


kws 


6{8@FAD4 
4E75 


80808038 
6028 
ACORBAIA 
618 
(808041 
bD14 
eCeaG846 
bEGE 
90306087 
CeBCeRRRaEEF 
08308884 
4E75 


48572028 
2E38854A 
CEBCOGBGFFFF 
DEBBGS46 
21078546 
6188FA98 
3282 
2282 
2244 
61@0F72 
b{88F 608 
(688853 
66F2 
G168F714 
6188F GBA 
80800836 
6bE4 
6{80F 788 
b1GQF SAC 
338! 
Ba19 
b7F2 
4Aal 
boCE 
oCeaeaad 
66(8 
6188FA52 
4BFAG421 
b{80F59E 
4COFO404 
4€75 


8C1580eD 
STIA 
BEF C80008628 
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BSR PCRLF; 
RTS; 


ASTOHK: CNPI.B $38,003 
BLT.S ASTERR: 
CHPI.B $34,003 
BLT.S ASTOL: 
CHPI.B $41,083 
BLT.S ASTER} 
CHPI.B $46,003 
BGT.S ASTER} 
SUB.B 7,003 
AND.L $F 1083 
ORI.B 4,CCR: 
RTS; 


ASTOL: 
ASTERR: 


FINDHEAD: MOVEM.L 02/A2,-(A7); 
MOVE.L LASTIO,D7;! QUTPUT LIKE BEFORE 
AND.L SFFFF D7; 
ADD.L IDFLAG,D7; 
MOVE.L 07, IDFLAG; 
BSR PCRLF; 

ADDG.L 1,025 

MOVE.L 02,01; 
HOVEA.L A2,Al;' BEGINN OF HEADER 
BSR INCH; 

BSR OUTCH}! ECHO IT 
CNPI.B 'S’ DQ; 

BNE.S FINDH{; 

BSR INCH; 

BSR QUTCH; 

CHPI.B ’8' 08; 

BNE.S FINDH{; 

BSR INCH; 

BSR QUTCH; 

SUBQ.L 1,01; 

CHP.B (AL) +,085 
BEQ.S FINDH2; 

TST O43 

BNE.S FINDH@; 

CHPI.B $80,085 

BNE.S FINDH@; 

BSR PCRLF; 

LEA.L MESSFOUN, AS; 
BSR PDATAS 

MOVEN.L (A7)+,02/A25 


RTS; 


FINDH@: 
FINDH{: 


FINDH2: 


SEANEXT: CMPI.B $60, (A5); 
BEG.S SEANEXTE; 


CHPA.L #COMBUFF ,A5; 
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1695 FEGFC4 
1696 FEGFCA 
1697 FEAFCA 
1698 FEGFCC 
1699 FEGFD@ 
1788 FEAF D2 
1781 FEGFDS 
1782 FEGFLS 
1783 FEGFDA 
1784 


— 1785 


1786 
1787 
1788 
1789 
1718 
i74i 
1712 
1713 
1714 FEGFOC 
1715 FEGFDE 
1716 FEAFE@ 
1717 FEAFES 
1718 FEBFES 
1719 FE@FEC 
1728 FEGFEE 
1721 FEGFFA 
1722 FEBFFS 


{79 


aia 


1724 FEGFF8 
1725 FEGFFC 
1726 FELG8 
1727 FELBG2 
1728 FEL@G6 
1729 FE688 
1738 FEIG8C 
1731 FEL@1@ 
1732 FELi4 
1733 FELHL8 
1734 FELQIA 
1735 FEIGIE 
1736 FEL22 
1737 FEI8Z6 
1738 FE1828 
1737 FEL82A 
174@ FEL62¢ 
TAY FELB2E 
1742 FEIG32 
1743 FE1834 
1744 FELG38 
1745 FEL@3A 
1746 FELG3E 
1747 FEL648 
1748 FELG44 
1749 FE1846 
1758 FE1648 
1751 FEL@4C 


kw 


5786 
OC1 08828 
b6EC 
AC1 08828 
b7FA 
1O2DFFFF 
4E75 
1615 
4E75 


4282 

4283 
2A588546 
2885 
CABCOAROFFFF 
3385 

4844 
COBCBRBRFFFF 
7882 


S{S0FFBE 
ACae8880 
6744 
BCQRAGZF 
675A 
80988823 
b7BA8RA8 
(888822 
6682089¢ 
244) 
40159880 
67888892 
C1 08822 
bOF2 
2440 
5582 
948A 
6180F 202 
1810 
oCeseeeD 
6774 
ACHRRE2F 
6722 
(908823 
664C 
1610 
b{GQFEER 
6664 
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SEANEXT{: 


SEANEXTE: 


SAN 68K MONITOR VERSION 2.3 


BE@.5 SEANEXT{;! SKIP BLANKS ONLY 
CHPI.B $28, (A5) +; 

BNE.S SEANEXTS 

CHPT.B $26, (A5)+; 

BEG.S SEANEXTI; 

HOVE.B -4(A5) 08; 

RTS; 

MOVE.B (AS) 08; 

RTS; 


'## IN 15 A5 TO POINT TO COMANDLINE 
'## QUT D2=LENGTH OF NAME 


$$ 
133 
133 
ie 3 
a 


LOADSYN: 


LOADSI: 


LOADS22: 


A2=BEGIN OF " 

D3=LENGTH OF MESSAGE 
AJ=BEGIN OF N. 

D4 LOAD CHANAL HR @.... 

D5 MESSAGE CHANAL NR @.... 


CLA.L 025 

CLR.L 035 

MOVE.L IOFLAG,05; 

MOVE.L 05,04; 

AND.L SFFFFWD5; 

SUBQ.L 1,055! 19 STANDART QUTPUT CHANAL 
SWAPW D4; 

AND.L SFFFF,O4;! INCHANAL-NR 

MOVEG.L 2,043! STANDARD MDCR 


BSR SEANEXT; 

CHPI.E $80,083 

BEQ.S LGADS225 

CMPI.B '/’ 08; 

BE9.5 LOADSEDN; 

CHPILE 8? [85 

BEG.W LOADEND;!' LOAD WITHOUT NANE 
CMPI.B $22,085 

BNE. W LOADSERR; 

MOVEA.L ASyA2;' 15 START OF HEADER 


{MPI $0, (A5)5 


BEG. LOADSERR; 
CHPI.B $22, (A5) +5 
BNE.S LOADS{; 
MOVE.L AS50235 
SUBQ.L 1,02; 
SUB.L AZ,025 

BSR REMBLANK; 
HOVE.B (A5)+,085 
CHPI.B $80,085 
BEG.S LOADEND; 
CHPI.B '/’ 508; 
BEQ.S LOADSEON; 
CAPI.B '#* 08; 
BNE.S LOADSERR; 
MOVE.B (A5)+,085! ENTRY WITHOUT NAME WITH CHANAL 
BSR ASTOHX; 

BNE.S LOADSERR; 
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1752 FEL@4E 
1753 FE1@5@ 
1754 FE854 
1755 FEL@54 
1756 FEL@5A 
1757 FEL@5¢ 
1758 FEi868 
1759 FE1862 
1768 FEI@66 
1761 FELG68 
1762 FE{B6C 
1763 FELQ6E 
1764 FEL672 
1765 FEL874 
1766 FEI676 
1767 FELG7A 
1768 FEL@7C 
1769 FE1G8@ 
1778 FE{8&2 
1774 FEL@84 
1772 FEL8B6 
1773 FE1HR8 
1774 FELaC 
1775 FELQSE 
77h FELG92 
1777 FEIG94 
1778 FE1G98 
1779 FELB9A 
1786 FEL9C 
1781 FELGAG 
1782 FELBAZ 
783 FEL@A4 
1784 FELBAG 
1785 FEIBAC 
1786 FEL@AE 
1787 FEL8B6 
1788 FEL8B2 
1789 FELGBS 
1798 
1794 
1792 
1793 FELSB8 
1794 FEL@BE 
1795 FEL6C2 
1796 FELBC4 
1797 FEL6C8 
1798 FELGCC 
1799 FEL@CE 
1898 FE{8D2 
1861 FEI8D6 
1882 FEL@D8 
1883 
1884 FELADA 
1885 FEL8DE 
1866 FEIGEZ 
1887 FELGES 
1888 FELGEA 


kw 


2888 
6{80F 288 
161) 
(888880 
6752 
6(88882F 
6658 
b188F29E 
1610 
(980080 
6748 
60880822 
bbJE 
264) 
AC156060 
6736 
80108822 
boF4 
268) 
3383 
9688 
b{80F278 
1010 
CARBO) 
b71A 
(808823 
6618 
1810 
G1 BOFERC 
6618 
ZAg8 
b18F 25C 
80158880 
6684 
9088 
4E75 
B23C88FB 
4E75 


21FBG546054A 
Si GBF EFS 
338) 

b180F C8C 
66888808 
2848 

b188F C82 
bbB888B4 
2A48 

BBCC 


b3BGHBAE 
48E7886C 
618BF916 
4BFAG2F6 
6188F 462 
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LOADSEON: 


LOADSEI: 


LOADEND: 


LOADSERR: 


e ° 


SAN 58K MONITOR VERSION 2.3 


MOVE.L 06,045 ! IS IH-CHANAL-NR 
BSR RENBLANK; 

MOVE.B (A5)+,08; 

CHPI.8 $80,085 

BEG.S LOADEND; 

CNPI.B '/" 08; 

BNE.S LOADSERR; 

BSR REMBLANK;! IS FOR ALL AFTER / 
MOVE.B {A5)+,08; 
CHPI.B $80,085 
BEG.5 LOADEND; 
CHPI.B $22,085 
BNE.S LOADSERR} 
MOVEA.L A5,A33! 
CHPI.B $0,(A5); 
BEQ = LOADSERR} 
CHPI.B $22, (A5) +5 
BNE.S LOADSES; 

MOVE .L AS, 03; 

SUBG.L 1,03; 

SUB.L AS,03;! 15 LENGTH 
BSR REMBLANK ; 

MOVE.B (A5)+, 08; 
CMPI.B $80,085 

BEQ.5 LOADEND; 

CNPI.B '#' 08; 

BNE.S LOADSERR; 

MOVE.B (A5)+,085 

BSR ASTON; 

BNE.S LOADSERR; 

HOVE.L 08,05; 

BSR REMBLANK; 

CMPI.B $80, (A5); 

BNE.S LOADSERR; 

SUB 08,08; 

RTS; 

ANDI.B $FB, CCR} 

RTS; 


'## RECORDES S-RECORDS IN MOTOROLA-FORMAT #4 


SAVENOCO: HOVE.L IQFLAG,LASTIO; 


SAVENOSE: CMPA.L AS,A53! TO LOOK IF ASDA4 ###SEK. ENTRY FRON 


BSR SEANEXT; 

SUB@.L 1,5; 

BSR READHX;! SYNTAX IS: SA FROM,TO 
BNE.W SAVEMOEN;! ERROR 

MOVEA.L DB,A4;! IS FROM POINTER 
BSR READHY; 

BNE.W SAVEMOEN;! ERROR 

MOVEA.L DO,A5;! IS TO POINTER 


'# EDITOR FILE-SAVE 


SAVENO!: 


BLS.W SAVEMOEN;! DO NOT 

MOVEN.L A4-AS,-(A7)3! SAVE POINTERS 
BSR PCRLF; 

LEA.L MESFILED AS; 

BSR PDATAs' TO ASK FILEDEFINITION 


IS START OF MESSAGE TO HOST 
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1889 FELGEE 
1818 FELGF2 
{811 FELGFS 
1812 FELGFS 
1813 FELGFC 
1814 FEL198 
1845 FE1192 
1816 

1847 FEL{86 
1818 FEL19A 
1819 FEL{8C 
1828 

1824 FELi{1@ 
1822 FEL14 
1823 FEG116 
1824 FELIC 
1825 FEL{22 
{926 FEL24 
{827 FEG126 
1828 FEL{28 
1829 FEL12A 
1838 FEL{2E 
1831 FEI138 
1832 FELIZ 
1833 FE1136 
1834 FELIA 
1835 FEL3E 
1835 FEL142 
1837 FEGL44 
1838 FEL{46 
1837 FEL4A 
1846 FELLaC 
1841 FELL4E 
1842 FEL15@ 
1843 FELI54 
1844 FEL{56 
1845 FEQ{5A 
1846 FEL{SC 
1847 FEL{SE 
1848 FEL{62 
1849 FEL166 
1858 FELI6A 
1851 FEL16¢ 
1852 FEL1bE 
1853 FEL{72 
1854 FEI174 
1855 FE1178 
1854 FEL{7C 
1857 FE118@ 
1858 FEL184 
1859 FEL18A 
1868 FE119@ 
1861 FEL196 
1862 FELI9A 
1863 

1864 

1845 


KW Ss 


61 80F98A 
b{QGF IFC 
GbEA 

4BF 20620 
S{BQFEDE 
b6E8 

4COF 3880 


aC84b0e? 
684 
bRBBAIAC 


40840801 
6680 
117088858087 
1iFCBREARCG? 
4483 
b7iC 
4288 
BBC8 
21088546 
5383 
1618 

61 88F SAC 
SI CBFFFB 
1650888) 
61 80F 589 
4288 
99¢8 
21088546 
4A? 
b7iC 
7053 

G1 G0F 4EE 
7038 

bi GGF 4E8 
5382 
181A 
b188F 468 
SICAFFFS 
6100F 892 
6138 
7053 


-6160F 408 


7039 

bi GGF4CA 
6180F 888 
1838A5EC 

61 8GF 4BE 
21F8G54A0546 
11F (098058087 
11F088688(67 
61G0F 862 
4E75 
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BSR PCRLF; 

BSR INLINE;! TQ GET COMMAND 

BNE.S SAVEROI: 

LEA.L COMBUFF ,A5; 

BSR LOADSYN; 

BNE.5 SAVEMO{;! THERE WAS AN ERROR 
MOVER. (A7)+,A4-A53 


'# THIS 1S TO 60 TO MINI-DCR #8 


OTHERSAY: 


QTHERS{{: 


SAVERO?: 


SAVENOS: 


SAVENO4: 


SAVEMOEN: 


CHPI.2 2,08} 
BNE.S OTHERSAV: 
BRA.W MINISAVE; 


CNPI.B 1,04; 

BNE.S OTHERS{1; 

MOVE.B $5,ACIAZCO;! IS FOR ECHO FRON HOST 
MOVE.B SEASACIAZCOS ' RTS IS LOW 

TST 033 

BE.5 SAVENG2;! NO MESSAGE TO HOST 

CLA.L 08; 

BSET.L 05,08; 

NOVE.L DQ, 1OFLAG; 

SUBQ.L 1,03; 


+ MOVE.S (Ad) +5085 


BSR QUTCHS! SEND MESSAGE 
DBF 03,SAVERO3; 
MOVE.B $80, 08; 

BSR OUTCH; 
CLR.L Ds! 
BSET.L 04,085 
MOVE.L 0, i0FLAG; 

TST B23 

BE@.5 SAVENO4;! NO HEADER 

MOVE@.L 'S’ 085 

BSR QUTCHS 

MOVES.L 78’ DB; 

BSR OUTCH; 

SUB@.L 15025 

MOVE.B (A2)+,08; 

BSR OUTCH; 

DBF 02,SAVENO5;! SEND HEADER 

BSR PCRLF; 

BSR.S SAVESRECs! TO SEND S1/52 RECORDS 
HOVEG.L 'S’ D8; 

BSR OUTCHS 

MOVEG.L °9° 085 

BSR QUTCH; 

BSR PCRLF}! THIS END 

MOVE.B ENDKERNU, 08; 

BSR QUTCHS! ENDKENNUNG DAHINTER 

MOVE.L LASTIO, IGFLAG; 

MOVE.B $5, ACIA2CO; 

MOVE.B $68,ACIAZ2CO; ' RTS RETURNS TO HIGH STATE 
BSR PCRLF; 

ATS; 


TO SET QUTCHANAL 


'## SENDS 51/52 RECORDS FROM A4 TO AS #4 
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1866 FEL19C 
1867 FELI9E 
1868 FEL1A8 
1869 FEL1A2 
1878 FEL{A4 
1871 FEL{A8 
1872 FELMAE 
1873 FEL18@ 
1874 FEL{B2 
1875 FEL1B6 
1876 FEL188 
1877 FELIBA 
1878 FELiBC 
1879 FEL{BE 
1886 FELi(8 
1881 FELIC2 
1882 FELIC4 
1883 FEL1Cé 
1884 FEL1C8 
1885 FELICA 
1686 FELICE 
1887 FELi1D8 
1888 FEL102 
1889 FELiD4 
1898 FE11D8 
1891 FELIDA 
1892 FEL10C 
1893 

1894 FELIDE 
1895 FELLE@ 
1896 FELiE4 
1897 FEME6 
1898 FEL{E8 
1899 FEL{EA 
1908 FEL{EC 
1981 FELLEE 
1982 FELIFA 
1983 FELLF2 
1994 

1985 

1986 FELIF4 
1987 FELIFS 
1968 FEL{F8 
1969 FELIFA 
1918 FELIFE 
1941 

1912 FE1280 
1913 FE{282 
1914 FEL284 
1945 FEI286 
1916 FEL26¢ 
1947 FEL2GE 
1918 FEL216 
1919 

1928 

1921 

1922 FE1212 


kv 


4234 
6168 
603A 
7853 

61 8BF49A 
BOF COGBOFFEF 
&C2E 
7031 
b180F 48C 
2685 
5888 
6138 
208C 
E898 
6132 
2860 
612E 
181¢ 
612A 
SiCOFFFA 
4604 
1664 
6128 
6188F 824 
B9CD 
638 
4E75 


7932 
b{8QF 45E 
2885 
5488 
618A 
2880 
E898 
£898 
5182 
6803 


0888 
E898 
7282 
6{88F7(8 
4E75 


TAGF 
28D 
9C8C 
6085808800! 8 
6(82 
2AG4 
4€75 
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SAVESREC: 


SAVESRE! : 


SAVESRE3: 


SAVESRE4: 
SAVESRE?2: 


SAVESNIB: 


SAVESTLE: 


SAVESTL{® 


SAM 68K MONITOR VERSION 2.3 


CLALL O43! 1S CHECKSUMCOUNT 
BSR.S SAVESTLE; 

BLT.S SAVESRE4s 

MOVES.L 'S" DQ} 

BSR QUTCH: 

CNPALL SFFFF-16,A8} 

BEE.S SAVESRE2; 

MOVER.L ‘17083 

BSR OUTCH; 

MOVE.L 05,08; 

ADDG.L 4,083 

B5R.S SAVESNIB;! 1S LENGHT OF LINE 
NOVE.L A4,083 

ROR.L 8, 003 

BSR.S SAVESNIB: 

MOVE.L 4,083! 

BSR.S SAVESNIB}! THIS WAS PC 
NOVE.B (A4)+, 083 

BSR.S SAVESNIB; 

DBF 5,SAVESRE3; 

NOT.B D4; 

MOVE.B 04,08; 

BSR.S SAVESNIB;! AND CHECKSUM 
BSR PCRLF; 

CHPA.L AS,A43 

BLS.S SAVESREC}! NEXT RECORD 
RTS} 


MOVES. °2' 08s 
BSR OUTCH; 
MOVE.L 05,085 
ADDG.L 5,08; 
BSR.S SAVESNIB; 
MOVE.L Ad, D8; 
ROR.L 8,08; 
ROR.L 8,08; 
BSR.S SAVESHIBS 
BRA.S SAVESRES; 


ADG.B 08,04; 
ROR.L 8,085 
MOVES.L 2,015 
BSR PRINIB; 
RTS; 


MOVE@.L 15,053! NR. OF BYTES~{ 
MOVE.L A5, 055 

5UB.L A4 yb; 

CHPI 16,06; 

BGE.S SAVESTL{; 

MOVE.L 06,05; 

RTS; 


EBIGG1G4EB@ ASSEMBO: JSR ASSEMBLE; 
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1923 FELZ{8 
1924 FEG2iC 
1925 

1926 

1927 

1928 FEZ! 
1729 FEL2Z22 
1938 FEL22 
1931 FEL22A 
1932 FEL22E 
1933 FELZ32 
1934 FE1236 
1935 FEL23A 
1936 FEL2IE 


1937 FEL242 © 


1938 
1939 
1948 
1944 
1942 
1943 
1944 FEL246 
1945 FEI24A 


1946 FEL252 
1947 FEI256 
1948 FELZ5A 
1949 FELZSE 
19568 FELZ&2 
1951 FEL2b6 
1952 FELZ6A 
1953 FEI26C 
1954 FEZ? 

1955 FEI274 
1956 FEI276 
1957 FEG27A 
1958 FEI27E 
1959 FEL282 
1968 FE1284 
1961 FEIZ8A 
1962 FEL28E 
1963 FE129@ 
1964 FE1294 


1965 FEI298 


1966 
1967 
1968 
1969 
1978 FEIZ9C 
1971 FEA29E 
1972 
1973 FEW2A2 


1974 FELZAA 
1975 FEL2AE 
1976 FE12B2 
1977 FELZB6 


kws 


88302884 
4E75 


{BF 7DA 
4BFAGIBA 
b{88F 326 
b180F7CE 
S{O0F 208 
688EE92 
4BF 8628 
61 GBF DAG 
bb8REE86 
68880912 


6188F7B2 
21F 08081800! 
0546 
S1QBEEEA 
AGF C2208 
b188F 2F2 
b1Q8F 79A 
4BFAG228 
b188F2E6 
7288 
202F BOE 
21 (88544 
4E68 
21C8859C 
b180F748 
b{88F77A 
ABFABI9! 
b {BAF 206 
202F 8806 
7288 
b180F 732 
b108F 754 
GBGBEDEC 


2F6D 
4BFAGIBA 
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ORI.B 4,CCR; 
RTS; 


PACKTAPE: BSR PCRLF; 


LEA.L MESFILED,AS; 
BSR PDATA; 

BSR PCRLF; 

BSR INLINE; 

BNE.W MLOOP; 

LEA.L COMBUFF ,A5; 
BSR LOADSYN; 

BNE.W ALOOP; 

BRA.W PACKTs 


'## TRAP ERRORS COMES HERE #4 


TRAPLON: 


TRAPERR: 


21F 089818881 TRAPALL: 


0544 

61 80F74E 
46F (2288 
61 08F 29A 
6188F 742 


BSR PCRLFS! IS FOR BUS AND ADDRESS-TRAP 


HOVE.L STANDIO, IOFLAG; 


BSR.W INTACIAS; 
MOVE .W $2288,5R; 
BSR PDATA; 
BSR PCRLF; 


LEA.L ERRONPC,AS;! IS IN THIS CASE NEXT INSTR 


BSR PDATA} 

MOYES.L 8,015 
MOVE.L 14(A7) 085 
MOVE.L 0, PCRG; 
MOVE.L USP, ADs 
MOVYE.L AG, USTP; 
BSR PRINIB;! IS PC 
BSR PCRLF; 

LEA.L ERRORACC,AS; 
BSR POATA; 

MOVE.L &(A7) 085 
MOVES.L 8,4; 

BSR PRINIBs' [5 ACCESS ADDRESS 
BSR PCRLF: 

BRA.W WARMST; 


MOVE.L A5,-(A7)5! ALL OTHER TRAPS 
LEA.L TTRAPERR AS; 


HOVE.L STANDIO, IOFLAG; 


BSR PCRLF; 
MOVE.W $2288,5R; 
BSR PDATA; 
BSR PCRLF§ 
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1978 FEAZBA 
1979 FEYZBE 
1988 FE{2C2 
1981 FE{2¢4 
1982 FEL2C8 
1983 FEL2CA 
1984 FEA2CE 
1985 FEL202 
1986 FEW2D4 
1987 
1988 
1989 
1998 
1991 
1992 FEL2DA 
1993 FEL2E@ 
1994 FE{2E2 
1995 FEL2E6 
1996 
1997 FELZEA 
199§ FELZEC 
1999 FEGZFa 
2888 
2081 FEL2F2 
2882 FELZF4 
2083 FELZFS 
2884 
2885 FEL2FA 
2886 FEL2FC 
2087 FELS8@ 
2888 
2809 FELI@2 
2818 FELIB4 
2811 FELIAG 
2812 
2813 FELIBA 
2014 FEL3i6 
2915 FELS12 
2816 FEG316 
2617 
2818 
2819 
2028 
2821 
2822 FELIIA 
2623 FELSIC 
2024 FEL322 
2825 FEL324 
2826 FELI26 
2627 
2628 
2829 FELS2A 
2638 FELI2¢ 
2031 FELI2E 
2832 
2633 
2834 


kv 


ABFAGICE 


~ G1B0F28E 


2A5F 

202F 6882 
7288 

61 80F 6F8 
b180F72A 
b{9AF BEE 
SOBGEDAE 


4OF OFFFFASSC 
2FeD 
4BFAGI23 
bGABFFSE 


2F G0 
SBF AGL 4 
5888 


2F 9D 
4BFAG14D 
6BA8 


2F 480 
4BFAG1S1 
4848 


2F 8D 
ABFABISA 
6898 


4OF aFFFFASSC 
2F@D 
ABFAGILi 
GROFF ZE 


2F 88 
263088858828 
6186 

201F 

GB88F 554 


5388 
boFC 
4E75 
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LEA.L ERRORPC,A5; 

BSR POATA; 

MOVEA.L (A7}+,A5; 

MOVE.L 2¢A7) 08; 

MOVES.L 8,04; 

BSR PRINIBS' TO PRINT LAST PC 
BSR PCRLFS 

BSP BREAKING; 

BRA.W WARNS]; 


'# AND HOW SPECIAL CASES OF TRAPS USEFULL 10 
'# KNOW WHAT KIND OF TRAP OCCURED 


ADDRESSE: MOVEM.L O@-D7/A9-A7 REGS; 
MOVE.L AS,-(A7}; 
LEA.L ERRGRAD AS; 
BRA.W TRAPLON: 


TLLINSTR: HOVE.L AS,-(A7)} 
LEA.L ERRORIL JAS; 
BRA.S TRAPALL; 
TERODIVE: MOVE.L AS,-(A7) 3 
LEA.L ERRORZE,A5} 
BRA.S TRAPALL; 
QUTOFRAN: MOVE.L A5,-(A7}; 
LEA.L ERROROU,A5; 
BRA.S TRAPALL: 
PRIVILEG: MOVE.L AS,~(A7); 
LEA.L ERRORPR AS; 
BRA.S TRAPALL; 
BUSERR:  MOVEN.L 08-D7/AG-A7 REGS; 
NOVE.L AS,-{A7)} 
LEA.L ERROBUS)A5; 
— BRA.W TRAPLON} 


'## 15 70 HANDLE HMI=PANIXBUTTON #4 


NMIABO: 
MOVE.L DB,-(A7) 5 
MOVE.L $59808, 08; 
BSR.S WAITDG; 
MOVE.L (A7)+,08; 
BRA.W CONTROLC; © 


WAITOG: SUB@.L 1,08; 
BNE.S WAITDAS 


RTS} 
 ## TABLE OF REGISTERNAMES #4 
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2035 FELI3@ 


2036 FEL340 


2837 FEL35@ 
2838 FEL354 


2039 
2848 
2041 
2042 FEL2O6 


2842 FELI7@ 
2843 FELI71 


2043 FELI&82 
2643 FELI86 
2044 FEL38? 


2844 FELIIE 
2045 FELI9F 
2845 FELIAS 
2046 FELIAS 
2047 FELJAA 


2047 FELIB6 
2848 FELIB? 


2048 FEGSC7 
2049 FELICE 
2049 FELICC 
2858 FELSCD 


2056 FELIOD 
2051 FELIBE 


2051 FELJEF 
2052 FELIF@ 


2852 FEL482 
2853 FEL4a3 
2053 FEL4A6 
2054 FEL487 


2054 FEL4{14 
2055 FEL415 
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384431443244 
539434443544 
36443744 

JONI 41I241 
S3413441 5541 
364153553 

535552534358 
384251423242 
534234423542 
36423742 


425245414028 
41542034 

a4 
534140203638 
AB202B4DAFAE 
495445220 
56322633 

a4 
425245414050 
4F 4946545320 
414354495644 
5445442034 
a4 
57484154203F 
a4 


8208884 
545241582845 
32924F522021 
Ad 
434845434853 
554028455252 
4F5 22021 

a4 

AAT 23E 

84 

4b 4FS54E 4428 
335441525428 
ACF AL a4 

4 
464940452044 
454649464954 
494F AE 2O3F 
84 
404153542049 
4E5055542849 
A74E4F524544 
04 

454644 

94 

AY 4444524553 
532845525 24F 
52 

04 
444343455553 
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RESTABS «= OC 'BDLOZDID405D4D70" 5 


= 


C 'BALAZAJASASAGASS’ 


DC 'SURSCP’ : 


BPTAB: § = DC.’ BBAB2BIB4B584878" ; 


'## SOME MESSAGES = ## 


TBRP: OC ‘BREAK AT :'3 OC.B 4; 


TRES: OC 'SAM 48K MONITOR '30C.L MONVERS OC.8 4; 


MESSACT: 00 ’BREAKPOINTS ACTIVATED :'30C.B 45 


TWHAT:DC = "WHAT 7730.8 45 


TOEL: DC.L $A8288804; | DELETE CHAR. 
TTRAPERR: OC ‘TRAP ERROR ''s DC.B 45 


MESSCHER: fC ’CHECKSUM ERROR '’s DC.B 4; 


MESSHCR: OC 'NCRD’SDC.B 45 
MESSFOUN: DC ‘FOUND START LOAD’; OC.B 45 
MESFILED: OC ‘FILE DEFINITION ?'30C.B 45 
MESSIGNO: DC ‘LAST INPUT IGNORED’; DC.B 4; 
MESSEND: OC ‘END’; OC.B 45 
ERRORAD: DC ADDRESS ERROR’ ;0C.B 4; 


ERRORACC: OC ‘ACCESS ADDRESS ‘30.8 4; 


_— 
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2855 FEL424 
2056 FE425 


2056 FEL42E 
2057 FEL42F 


2057 FEL442 
2058 FE1443 


2058 FEL44E 
2059 FEL44F 


2859 FEL4&5F 
2068 FEL468 


2068 FEL473 
2061 FEL474 


2861 FEL483 
2062 FEL484 


2062 FEL48B 
2063 FEL48C 


2063 FEL495 
2064 FEL496 


2064 FEL4A9 
2065 FELSAA 


2065 FEL480 
2866 FEL4BE 


2064 FEL4SCE 
2067 FEL4CF 


2067 FEL40B 
2068 

2069 

2878 FEL40C 
2071 FEL4SDE 
2672 FEL4E2 
2073 FEL4E4 
2074 FEL4E8 


ks 


284144445245 
535328 

g4 
425553204552 
524F52 

04 

A9ACHCH5 ATA 
AC28494E5354 
5255435 4494F 
aE 

04 

SA45524F 2844 
4956494445 
B4 

$348 4B204F55 
54204F 462852 
Sf 4E4745 

84 
3052495494 
454745205649 
SFACHS4494F 
4E 

a4 
41424F525445 
442056494128 
404352 

a4 
204154285843 
28 

94 
284645585428 
504328 

84 

SEED DLLLLLLL 
SAG aay ay 
414141595553 
58 

a4 
383132333435 
J65738313233 
$49538535552 
iJ 

a4 
303132533435 
563738594142 
43444546 

04 
§24F 4F 542045 
32524F 522824 
84 


3245 
GOFEGSSE 
524¢ 
RAF EGBBE 
494F 
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ERROBUS: DC *BUS ERROR’ 30C.8 4; 


ERRORIL: DC 'ILLESAL INSTRUCTION’ 50C.8 45 


ERRORZE: OC ‘ZERO DIVIDE’ ;0C.B 43 


ERROROY: DC ’CHK OUT OF RANGE'30C.8 4; 


ERRORPR: = D¢ “PRIVILEGE VIOLATION’ ;OC.8 43 


ERRORAB: OC ‘ABORTED VIA MCR'30C.8 4; 


ERRORPC: OC ' AT PC *3DC.B 4; 
ERRONPC: DC ' NEXT PC '3 DC.B 43 


MESDATEN: DC 'DDDDDDDDAAAAAAASUSP’ ;DC.B 43 


MESNUAM: DC '@L2345478123454S5RC' 300.3 45 


MES{ 234: OC 'B12345467B9ABCDEF’ 300.8 4; 


BOOTERR: OC ‘BOOT ERRCR ''30C.B 4; 


EVEN; 
COMTAB: OC.W 'RE’S! DISPLAY REGISTERS 
OC.L #OUTREG; 
OC.W 'RL’;! REGISTERLIST 
OC.L #LISTREG; 
OC.W '10'$! 10-LIST 


SAN G8 HORITOR VERSION 2.3 
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2075 FEL4EA 
2076 FEL4EE 
2077 FEL4FS 
2078 FELAF4 
2079 FELAFS 
2088 FEL4FA 
2OBt FELAFC 
2082 FE150@ 
283 FE1582 
2084 FE1506 
2085 FE1598 
2084 FELSOC 
2087 FELSGE 
2888 FEAS{2 
2089 FELS{4 
2098 FEL5{8 
204 FESSIA 
2092 FELSIE 
2693 FEL520 
2094 FE1524 
2095 FEL526 
2895 FEIS2A 
2097 FEL52¢ 
2098 FE1530 
2099 FEL532 
2108 FEL536 
201 FELSI8 
2182 FELSIC 
2103 FELS3E 
2104 FES542 
2185 FELS#4 
2106 FELS48 
2107 FEAS4A 
2108 FEISHE 
2189 FEL55 
2140 FELSS4 
2144 FELS56 
2112 FELSSA 
2113 FELS5C 
2114 FELS&O 
2115 FEL562 
2116 FELS64 
2147 FELS68 
2118 FELSOC 


2119 FELSOE 


2128 FEIS72 
2i2{ FELS74 
2122 
2123 
2124 FELS78 
2125 FELS7A 
2126 
2127 
2128 
2129 
2138 
a8} 


BOFERC28 
3354 
BOFERIGE 
484F 
GOFER774 
5452 
BOFEGI14 
a74F 
BOFER4GE 
434{ 
BOFER4IE 
3444 
GOFEB45E 
3443 
BOFER44B 
40 4F 
BOFEBASA 
4649 
BOFEBAS2 
3054 
ROFEL21E 
4F58 
BOFEBASC 
4455 
GBFEGCAC 
3544 
QBFE1GB8 
4C4F 
BOFEGDBS 
4448 
GBF EGBOE 
4148 
BAF EGBAC 
3553 
OF EGBS4 


BOFEGB LS 
4248 
BAFEGIFA 
4442 
GOFEGSL 4 
4342 
BOFEGIDA 


4954 
BOFEL92E 


/% 


OC.L #I0LIST; 

OC.W ST’! SINGLE STEP 
OC.L aSTEP; 

OC.4 ’HO’;! HOST MESSAGE 
OC.L #HOSTTRS 

OCW ' TR's! TRACE 

OC.L STRACE; 

OC.W 'G0';! G0 CORNAND 
OC.L #60C0K; 

OC.W CA's! CALL COMMAND 
OC.L #CALLCOM; 


OC.W ‘TD's! TRACE DISPLAY WITH CLEAR SCREEN 


OC.L #TDCOK; 

OC.W ‘TC's! NO CLEAR SCREEN 
DC.L ETC; 

OCW HO’; 

OC.L #HCVECOR; 

OCW FIs 


oDC.L SF ILLCORS 


OC.W TPT’; 

OC.L #PACKTAPE; 

OCW 'OP'§! OPEN MEMORY 

OC.L #HEMORY; 

OCW DUS! MEMORY OUMP 

OC.L SDUMPHER; 

OCW SA'S | 
OC.L #SAVENOCO;! RECORD MOTOROLACOD 
OC.W 'LO'S! LOAD MOTCROLA-CODE 
OC.L ##OLOAD; 

OC.W 'Da’s! SET DATA-REGISTER 
OC.L #DATREG; 

DC.W 'Ad’s! SET ADDRESS-REGISTER 
OC.L ADRES: 

OC.W 'SS’s! SET SUPERVISOR-ST.P. 
DC.L #STACKPS 

OC.W US's! SET USER-STACKP. 
OC.L #USTACKP; 

OC.W 'SR’S! SET STATUS REGISTER 
OC.L #STATREG; 

OC.W PC's! SET PROGRAM COUNTER 
OC.L #PROCOUN: 

DC.W Ba’! SET BREAKPOINTS 

OC.L #BREAKP; 

OC.W 'DB's! DISPLAY BREAKPOINTS 
OC.L #DISBP; 

OC.W ' CB's! CLEAR BREAKPOINTS 
DC.L #CLEARBP; 


OC.W IT’S 

DC.L #DELTAP;!' OELETE TAPE 

OC.W EDs! EDITOR WARMSTART 
OC.L #XEDITOR; 

DCW 'SC’s 

OC.L #XSCREENE; 

DC.W 'AS’S! ASSEMBLER EDITOR TEXT 
DC.L #ASSEMBD; 
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2132 
2133 FEASTE 
2134 FEIS88 
21355 
2136 FEL584 
2137 FELS86 
2138 
2139 
2148 FEI58A 
3547 
3548 
3549 
3558 
355! 
3552 
3553 
35534 
$555 
3556 
3557 
3558 
3559 
3568 
356! 
3542 
$543 
3564 
3565 
3346 
$567 
3568 
3569 
3578 
J57f 
3572 
3573 
3574 
3575 
5574 
S577 
3578 
5579 
3588 
3581 
3582 
3583 
3584 
3585 
5386 
358? 
3588 
3589 
3598 
J59f 
3592 
3593 
3594 


kw 


424F 
BOFEI5E8 


3445 
ROFE2978 


FFFF 
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#/ 


£Ett 
#itt 
8 2 3 
tttt 
#444 
#244 


OC.W '80'5 


SAN S8K MONITOR VERSION 2.3 


OC.L #STARTBOOT; 


OC.W 'TE's! TEST ROUTINEN 
OC.L #TESTALLES 


OC.4 -15! END OF TABLE 
LIST 4; 


4S 
/ESERESEELELEELEESESESSESESESSESE SLES ESELEELESEEEESESES 
3444 
YIDED-TREIBERROUTINEN FUER 3344 
SAM b8K 1334 
#344 
VERSION 1.1 #444 
(c) kws 1983 $444 


Ett 


ba SS | 


SESEESSLSEE EEL LLLELE ELISE EESELESEEELELLELESEEE LESSEE EEE 


#ttt 
fEEt 
$Et 
£444 
fttt 
fttt 
#344 


$344 


DER VORLIEGENDE TREIBER BEDIENT SOWOHL DIE #z## 
TASTATUR, DIE AN SAM 48K ANGESCHLOSSEN IST, #883 
ALS AUCH DEN VIDEOTEIL VON SAM GBK ZUR DAR- 234% 
STELLUNG VON SCHRIFT UND ZUR AUSFUEHRUNG = 2334 


VON SPEZIELLEN FUNKTIONEN. 


fttt 
$tit 


FEEESEESERSELERSELELALTELESLELEELELESE SLE LEEESEEELES EEE 


t 


# 
# 
# 
t 
t 
t 
# 
t 
t 
# 
t 
# 
# 
t 
# 
t 
# 
t 
# 
# 
t 
$ 
# 
t 
# 
# 
$ 


t 


BASISADRESSE DES VIDEQ-RAMS: t 
5 

$38008 ODER $F18008, JE NACH STELLUNG t 
DES ENTSPRECHENDEN JUMPERS é 

i 

FOLGENDE FUNKTIONEN STEHEN ZUR VERFUEGUNG: : 
t 

TEICHEN FUNKTION i 
ewe m mew ewe een eww ween ween on oom wm ww nwo ooo one = 
$8) = “N= CR CARRIAGE RETURN t 
$BA = *J = LF LINE FEED f 
$08 = “H = BS BACKSPACE t 
$08 = “K = YT CURSOR HONE UP t 
$82 = *B=STX — CURSOR HOME DOWN 3 
$80 = *L = FF CURSOR HOME/CLEAR SCREEN 
$OF = *0 = SI CURSOR UP t 
$8E = “N = 50 CURSOR RIGHT t 
$95 = *E = ENQ ERASE TILL END OF LINE = 
$12 = *P = DLE ERASE TILL END OF PAGE = 
$18 = ESC LEITET ESCAPE SEQUENZ EIN # 
a 

ES BEWIRKT: 3 
ESC A = {B41 US-ASCIIT ZEICHENSATZ i 
ESC B = {B42 CURSOR EINSCHALTEN t 
ESC D = 1844 DEVTSCHER ZEICHENSATZ t 
ESC C = 1843 ABSOLUTE CURSCRADRESSIERUNG# 
ESC & = 1845 CURSOR AUSSCHALTEN t 
ESC F = {B44 INVERTIEREN EINSCHALTEN = # 
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J5%5 
35% 
3597 
3598 
3599 
3688 
5684 
3682 
3683 
5584 
3685 
3686 
3687 
3688 
3889 
5618 
Jot! 
Jhi2 
3613 
Joi4 
J4t5 
Jh16 
Jot? 
3518 
3619 
3628 
3621 FE283@ 
3622 FE2034 
3623 FE2836 
362 
J625 FE283C 
3626 FEZO40 
3627 FEZB44 
3628 FE2846 
J629 FE2R4A 
3658 FEZB4E 
Jb31 FE2H52 
3632 FE2854 
d633 FEZ858 
3634 

3635 FE2BS¢ 
— 3656 FEZBE8 
3637 FE2064 
3658 FE2868 
3639 

3648 

Jb4t 

5642 

3643 

3644 

3645 FE2H6A 
3646 FE2QGE 
3647 FE2876 
3648 FE2874 
3649 FEZB76 
3656 FEZ@7A 
3651 FE267E 


Cr 00 te Cand PD mmm Che 


kv 


ABE 7FFFE 
61890844 
42488080 


42680804 
42280006 
4288 

323C888F 
43FAG848 
11CBBAG! 
3288 

11098A83 
SICSFFFA 


b1agaeae 
61988218 
ACDFTFFF 


AES 


4§E7 40084 
2A4E 
S23COFFF 
429) 
SiCSFFFC 
4COF 2862 
4€75 
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t ESe 6 = {847 
$ 
3 
i 


EEEELELELSEEEELELEE ELST ESE LESE EELS SILI TESTES ES SES ELST 


BASE {AB); 


TEILE: = S.B 45 
SPALTE: 05.8 {3 
ESCSW: = 05.8 i 
ESCOUNT: 0S.B 13 
DEUTSCH: 05.8 = 3 
CURSOFF: 0S.B = fy 
INVFLG: 05.8 = 13 


CURSORH: EQU = 145 
CURSORL: EU = 15; 
FSTADRY: EQU = 423 
FSTADRL: QU) = 13} 


| INITIALISIERE CRT-CONTROLLER 


INITCRT? HOVEM.L 08-07/A0-Ab,-(A7)3 
BSR 


GETPARAMS 
CLR.L = ZEILE; 
CLR.W DEUTSCH; 
CLR INVFLG; 
CLR.L D8; 
MOVE.W 15,003 
LEA.L TAB, AS; 
LOOP: = ROVE.B DO, CRTADR: 
ADDG.L 1,08; 
MOVE.B AL} +,CRTRESS 


OBF = DL, LOOP; 


BSR = CLRPAGE; 
BSR.W = INVERT; 


MOVER.L (A7)+,08-07/A8-Ab; 


RTS; 


INVERTIEREN AUSSCHALTEN 


SAN G&K MONITOR VERSION 2.3 


} 
i 
t 
i 
/ 


'LOESCHE ZEILE, SPALTE... 
Te eESCSW, ESCOUNT 
'LOESCHE DEUTSCH, CURSOFF 


TINITIALISIERE CRT-CONTR. 


'LOESCHE BILOSEITE 
‘CURSOR EINSCHALTEN 


| SUBROUTINE TUM LOESCHEN DER BILUSEITE 
1 INPUT: STARTADRESSE DER BILDSEITE IN Ad 


! 

CLRPAGE: 
MOVER.L D4/A5,-(A7); 
MOVE.L Ab AS; 
MOVE.W 4095,01; 

Ci: CLR.L = (AS) +5 
DBF = D1, C4; 
MOVEN.L (A7)+,01/A5; 
ATS; 


16 KB = 4896 LONGWORDS 
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352 
3653 
3654 
355 
3656 
3657 
J658 FE2888 
3459 FE2884 
3568 FE288A 
3661 FE2Q8E 
3662 FE2892 
3663 FEZ894 
5664 FEZ89A 
3665 FE289E 
3666 FE2BA8 
Jb47 FEZBA6 
5648 FE2BAA 
J669 FEZBAC 
3678 FE28B2 
3671 
5672 
3673 
5674 FEZBB4 
3675 FE2@B8 
J676 FE26BC 
5677 FE28C8 
3678 
3679 
5588 
568! 
3682 
5683 
5684 
3685 
3686 
3687 
5688 
3689 FEZOC4 
5698 FEZOCB 
Jo91 FEZOCC 
3692 FE2@D8 
3493 FEZ8D4 
J694 FE28D8 
3695 
3696 
5697 FEZODA 
5698 FEZBDE 
5499 FE2BEZ 
3788 FEZRE4 
5781 FE2GES 
J782 FE2BE8 
S783 FE2@EA 
3784 FE26EC 
3785 
3786 FE2QF@ 
3787 FE2OF4 
3788 


kws 


A{FBQ4F3 

SDF 906068088 
1£588991 
CEICBRGB 
b7{E 

40F 980038000 
BEIC2868 
b7{2 

40F9QAF 18808 
BE3CeG4e 
6786 

40F 980978000 
4E75 


24282333 
2507282! 
80078881 
J8e9n008 


48E7FFFE 
b1GQFFB4 
44280082 
6888506 
BASCORIF 
6258 


4IFAGGIA 
CO7CBGFF 
3219 
3419 
5784 
Ba42 
bOF6 
4EFBIGFE 


4COF7FFF 
475 
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! SUBROUTINE: LAEDT DIE ANFANGSADRESSE DER BILDSEITE -) Ab 
UND DIE ANFANGSADRESSE [ER YARIABLEN -) Ag 


. 


GETPARAM!: 


RET: 
! 


TAB: 


1 SUBROUTINE ZUR AUSGABE EINES BUCHSTABENS AUF DEM BILDSCHIRM. 
ERKENRT CONTROL-ZEICHEN UND ESCAPE-SEQUENZEN UND 
FUEHRT DIE ENTSPRECHENDEN FUNKTIONEN AUS. 


QUTCHAR: MOVEM.L D8-D7/AB-Aby-(A7)} 


' SUCHE, 


6079: 
60TO1: 


QUTC2: 
RETURN: 


LEA.L VARIABLES, AB} 
LEA.L = VIDEQRANS Abs 
MOVE.B PIADRA,D7; 
AND.B = $60,073 


-BE@ RET} 


LEA.L  VIDEDRAHN, Ab; 
CHP.B = $68,073 

BE? —SséRET;; 

LEA.L  VIDEQRAMV, Ad} 
CMP.B $48,073 

BE@ «RET 

LEA.L = VIDEQRAN2, Ab; 
RTS§§ 


OC.L = $2A282333; 
OC.L = $25872824; 
DC.L © $88878801; 
OC.L © $38808088; 


INPUT: BUCHSTABE ODER STEVERZEICHEN IN 0@.8 
ALLE REGISTER BLEIBEN ERHALTEN 


BSR = GETPARAK; 
TST.B = ESCSW; 
BNE.W = ESON; 
CHP.B = $1F,08; 
BHI.S — CHROYT; 


' TABELLE: ENTHAELT DIE WERTE ZUR CRT-CONTR. INITIALISIERUNG 
t 


TESCAPE FLAG AN? 


'CONTROL CHARACTER? 
'NEIN® GEBE BUCHSTABE AUS 


QB ES EIN SPEZIELLES CONTROLZEICHEN IST 


LEA.L 9 JHPTAB,At; 
AND.W = $@8FF DB; 
MOVE. W CAL) +04; 
MOVE.W (AL) 4,025 

BE@ = OUT C2; 

CHP.W 02,085 

BNE = GOTO; 

JHP (OUTC2,01.0)§ 


MOVEN.L (A7)+,D8-D7/AG-AG; 


RTS; 


‘HOLE OFFSET 
'HOLE STEVERZEI CHEN 
‘STOP; WENN ENDE DER TABELLE 


‘SUCHE WEITER 
'FUEHRE FUNKTION AUS 
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3789 FE2QFS ©9224 JMPTAB: OC.W © CARRIAGERETURN-DUTC2; OC.W $8080; 

3789 FE20F8 © 88D 

3710 FE2BFA © 234 OC.W  LINEFEED-OUTC?; DC.W $8094: 

3718 FE2@FC © BBA 

it FEZAFE ©8258 DC.W © BACKSPACE-QUTC?: DC.W $8088; 

3711 FE210@ © 8888 

3712 FE2182 © 829¢ OC.W  HOME-OUTC2; DC.W $8808: 

3712 FE284 © aAOR 

3713 FE2I06 §=©— 9288 OC.H © HOMEDOWN-OUTC2; DC.W $0002; - 

3713 FE2(G8 «©9882 

W714 FENBA © 2C4 OC.W © CLEARSCREEN-OUTC2; “OC. W $088C; 

3714 FE2@C © BAC 

3715 FEIBE © A2BA OC.W © CURSORUP-0UTC2; DC.W $0QaF; 

3715 FER{8 © aQGF 

371s FEZU{2  a2kE OC.W  CURSGRRISHT-OUTC2; DC.W $aaae; 

3716 FE214 © BABE 

3717 FE246 «©9285 OC.W ERATEDL-OUTC2; DC.W $8885; 

3717 FE2{8 © 8005 

3718 FE2MA 338 OC.W  ERATEOP-OUTC2; DC. $0010; 

3718 FEMIC }=— Bt 

3719 FE2ME © @3A2 OC.W  ESCAPE-QUTC2; DC.W $0818: 
O79 FE2128 «= BBB 

3728 FE2122 388 DC.W = BELL-QUTC2; DC.W $8087; 

3720 FE2124 «© 8887 

3724 FE2126 «= 884 DC.W = RETURN-QUTC2; DC.w $0088; 

3724 FE2128 © @a88 

3722 

3723 

3724 

a: 

372h | GEBE BUCHSTABE IN D@.B AN DER POSITION DES CURSORS 

3727 ! AUF DEM BILDSCHIRM AUS 

3728 

3729 FE212A © 4280004 CHROUT: TST.B DEUTSCH; 'GERMAN CHAR.-SET? 

3738 FE2I2E == A740 BEQ.S  CHROUTS; IND: OK 

W7U1 FE23@ «© -43FAR424 LEAL GTAB,AL; 

“3732 FE2M34 = BB19 CHRAL: = CHPLB = (A4) +, 083 

3733 FE2136 «= 64 BNE.S  CHROUTA2; NIST SPEZIALZEICHEN 

3734 FE2138 «= 1819 MOVE.B (AL)+,00; 'HOLE SPEZIALOFFSET 

3735 FE213A ©6004 BRA.S  CHROUTS; 

373 FE213C «= 4AL9 CHROUT@2: TST.B (A1)+; 

3737 FE2JE BOF 4 BNE.S  CHRO4; 

3738 ' ZEICHEN AUSGEBEN 

3739 FE214@ © 1@00BE CHROUT{: BSR.W  GETBYTEPOS; 

3740 FE2144 «= - 7889 MOVEG.L 9,045 146 RASTERZEILEN 

TTA FE2146 «©7640 MOVEG.L 64,03; 'TEILENABSTAND IN BYTE 

3742 FE21498 © 4482 TST.B 023 7 

3743 FE214A = 6B 28 BMI —-CASEQ; 

3744 FEZL4C = 6742 — -BEQsCCASES; 

3745 FE2U4E = 5342 SUBQ.4 1,023 

3746 FE215@ © 47880076 BEQ.W © CASE2} 

3747 

3748 FE2154 = 7ACB CASES: MOVES.L SFFFFFFCO,05; | = MOVE@.L $(8,05 

3749 FE2156 CBS AND.B D5, (A5)3 

3758 FE2158 —0BC3 ADD.L 03,A53 'ERSTE ZEILE DES BUCHSTABENS 

3754 FE2I5A 1245 CASE36: MOVE.B (A5) 043 


3752 FE2i5¢€ = €285 AND.B = 5,015 
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S753 FE2U5E 
3754 FE2148 
S755 FE2162 
3758 FE2{84 
S757 FE2166 
3758 FEZ{b8 
S759 FE2&E 
3748 FE2478 
3764 
S742 FE2{74 
S763 FE2176 
3764 FEZ178 
3755 FE2{7A 
3766 FE217¢ 
3767 FE2U7E 
768 FE21&8@ 
3769 FE2(82 
S778 FE2184 
S771 FE2188 
S772 FE2{8C 
3773 
S774 FE2196 
S775 FE2{94 
S776 FE2(9A 
S777 FE219C 
S778 FE2{AG 
779 FE2{A2 
5788 FE2{A4 
S781 FE2IA8 
3782 FE2{AA 
3783 FEZ{AC 
3784 FE2{AE 
3785 FE2{B8 
3786 FE2182 
3787 FE2{B6 
3788 FE21B8 
3789 FE2{BA 
5798 FE2{BC 
3791 FE2{C@ 
3792 FE2UC4 
3793 
3794 FE21C8 
3775 FE2ICC 
3796 FE2{02 
3797 FE2iD4 
798 FE2I08 
3799 FEZIDA 
S880 FE21DC 
3881 FEZ{ER 
3882 FE21E2 
S883 FE{Ed 
5884 FE2IES 
3885 FEZ{E8 
3886 FE2iEA 
5887 FE2IEE 
3888 FE2IFO 
5889 FE2{F2 


kW 


141¢ 
E43A 
0282 
1A8i 
bbC3 
Si CCFFFR 
51288802 
GBRBFF FE 


TAGS 
CBi5 
baC3 
1215 
285 
D21¢ 
1Aa! 
OBC3 
Si CCFFF 4 
61888886 


CASES: 


CASERR: 


bBRFF 42 ‘ 


Q21586F 
O220860F 8881 
DBCS 
JAICF COF 
1215 
E149 
12208001 
(245 
4242 
14i¢ 
E54A 
b242 
18418081 
E849 
1A8i 
DBCS 

Si CCFFE2 
6188087E 
bB88FF2A 


CASEL§: 


821508F8 
B22080IF AG81 
DeC3 
JASCF OIF 
1215 
E149 
1228081 
(245 
4242 
1410 
Eq4A 
242 
{8418801 
E849 
1a! 
ORCS 


CASE2: 


CASEZ@: 
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MOVE.8 
LSR.B 
ADD.B 
MOVE.8 
ADO.L 
DEF 
BSR.W 
BRA.W 


MOVES L 
AND.2 
ADD.L 
HOVE. 8 
AND. 
ADD.8 
MOVE.B 
ADDL 
ORF 
BSR.W 
BRA.W 


ANDI.8 
ANDI. 
ADD.L 
HOVE .W 
HOVE.B 
LSL.W 
HOVE .8 
AND.W 
CLR.W 
MOVE.B 
LSL.W 
ADD.W 
HOVE.B 
LSR.W 
HOVE .8 
ADD.L 
DBF 
BSR.W 
BRA.W 


ANDI.B 
ANDI.B 
ADD.L 
ROVE .W 
HOVE ..B 
LSL.4 
HOVE.8 
AND.W 
LR.W 
MOVE.B 
LSL.W 
ADD.W 
MOVE.B 
LoR.W 
NOVE.B 
AQD.L 
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iA4) +023 
2382} 
02,01; 

D1, (A5)5 
03,A5; 

04, CASEI2; 
HEWCURSORS 
RETURRS 


35055 
05,185); 
03,45; 
(A5) D4; 
05,04; 
(A4) +504; 
D1, (A5)3 
03,A5} 

04, CASEGG; 
NEWCURSOR; 
RETURNS 


$FC,{A5)§ 
$OF,1(A5); 
03,45; 
SFFFFFCOF D5; 
(A5) D4; 
8,01; 
1(A5) 5045 
05,01; 

02; 

(A4) +5025 
2502) 
02,01; 

D1, 4A5)5 
By Df; 

D1, (A5); 
03,A5; 

04, CASE18; 
NEWCURSOR; 
RETURNS 


$F8, (A5) | 
$3F ,1(A5)§ 
03,455 
SFFFFFASF 5055 
(A5) DL; 
8,01; 
{{A5) ,D45 
05,04; 

b2} 
(A4) + 025 
4,02; 
02,01; 

D4, 1(A5); 
8,01; 

D1, (A5)5 
03,5; 
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3818 FE2UE4 

gait FEZ{ES 

TRL? FEMEFC 

3813 

3814 

1B 

1B 

3847 

Jaa 

79 

1828 FE2200 

3821 FE2292 

1822 FE2204 

3823 FE2208 

3824 FE22BC 

3825 FE22AE 

24 FEI 
7 FE2214 

a FEIN 

3829 FED248 

3830 FEZ2IA 


3832 FE222 
3833 

3834 FE2224 
3835 FE222 
3834 FE2228 
3837 

3838 FE222 

3839 FE22E 
3840 FE2234 
38M FE2238 
3842 FE223¢ 
3843 

3844 FEDIIE 
3845 

3844 

3847 

3848 

3849 

3850 FE2240 
JB51 FE2244 
3852 FE2244 
3853 FE224A 
3854 FE2256 
3855 FE2252 
3854 FE2256 
3857 FE225A 
3858 FE2260 
3859 FE2242 
38b8 FE2266 
3861 FE22bA 
3862 FED2AE 
3863 

3864 FE2279 

3865 FE2I74 
3866 FE227 


kvs 


51 CCFFE2 
g1aaaa4s 
sROOFEF 2 


7288 
12288881 
3481 
C47Cang3 
£449 
CoFCa8ag 
5342 
6892 


b242 


7588 
16288898 
COF C8288 
0243 


48C1 
2A4E 
DBC! 


AFF ARTIC 
COBCARRBAAFF 
98308828 

CBF CBABA 
D9¢8 


4E75 


AAZ3RGRE 
6784 
S188083A 


. OC28RRIE RHE 


b31E 
42280001 
52280006 
028001 e008 
oR) 
33282868 
b1GB81EC 

61 GG888E 
4E75 


52288881 
61888604 
4E75 
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DEF 4, CASE ZO 
BS2.4 = NERCURSOR, 
BRA.W RETURNS 


i 
| SUBROUTINE ZUM BERECHNEN GER ANFANGSADRESSE DES 
BUCHSTABENS AUF DER BILDSEITE { -) a5 } 
YHD DES OFFSETS IM CHARACTER-GENERATOR 
! 


GETBYTEPOS: 
POVES.L 8, Dt; 
MOVE.3 SPALTE. D1; 
MOVEW 01,025 


AND.H 3,02} 'IST FALL NR. 


LSR.W 2,04; 'SPALTE/4.... 

MULULW 3,043 aes 

SUBQ.W 1502; 

BNI GBA; 

_ADDLW 2,048 ‘ast EXTRA 
6B: * KOVE9.L 8,03; 

MOVE.B ZEILE033 

HULU.W 648,033 

ADD.W 03,043 NIST BYTE OFFSET... 
HIN DER TEILE 

ENT.L OM; 

NOVELL AbsA5; 

ADD.L D4,A54 '(A5) ZEDGT AUF 1. BYTE 
‘DES. BUCHSTABENS 

LEA.L CHARS, A4} 

AND.L $FF 4003 

SUB.B $20,003 'KEINE CONTROL CHARACTERS 

MULU.W 184093 

ADD.L 08,443 (AK) TEIGT AUF 1. BYTE 
NIM CHARACTER-GENERATOR 

RTS} 


1 

! SUBROUTINE: BEWEGT DEN CURSOR UN EINE STELLE WEITER 
! UND SCHALTET IHN EIN 
! 

NEWCURSOR: 

TST INVFLG3 

BEG NEW 

BSR INVERTS; 

CMPI.B 78,SPALTE} 

BLS —(NEW23 

CLR.B SPALTES 

ADDG.B 1, ZEILEs 

CMPILB 24yZEILE} 

BLS NEWS; 

SUBQ.B 1, ZEILE} 

BSR.W SCROLL; 

BSR.W INVERT; 

RTS} 


TINVERTIEREN ? 


NEWL: 


NEW2: = ADD4.B 
NEWS: BSR 
RTS§ 


1,SPALTE; 
INVERT; 
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kws 
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3867 
5868 
3869 . BUBROUTINE IVA INVERTIEREN DES BUCHSTABENFELDES AUF DEM 
3872 GER CURSOR STEHT 
J87{ : 
5872 FE227A = 4A288085 INVERT: TST.8 © CURSOFF; VE NICHTS, #ERN... 
Ja73 FEZ27E 4782 pea =sINVERTI 14. DER CURSOR... 
5874 FEZ28R | 4E75 R153 ta» eAUSSESCHALTE 
3875 FEZ282 AL SBF FTC INVERTIS BGR.d =| SETBYTEPOS; 
J876 FE2286 = 7 ABA MOVES. 18, 24s Hf RASTERZEILE! 
Ja77 FEZ288 = 7b48 MOVES.L 64,033 IABSTAND RASTERZEILEN 
3878 TIN BYTE 
Jai? FEZZ8A = 4A82 TST.B  B2 
5848 FE228C = BIE BA! TRYB; 
Je8i FEZ2RE = 4734 BE9 IRE 
S882 FE2279 = 3442 SURG. 16023 
a FE2292 «6754 pea IBV 
1884 
3885 FE2294 = 7ACB INV: | MOVES.L SFFFFFFC8,05; 
5884 FEZ296 = 1215 INV3i: = -MOVE.8 =(A5) D4} 
5887 FE2298 «= 1484 MOVE.B DL,D25 
5888 FE229A = (285 AND.B 05.04; 


5889 FE229¢ «= BAAS OR.B = 05,025 
3898 FEZZ9E = 4682 NOT.B 025 

5891 FE2248 = 0282 ADC.B = 02,045 
5892 a 1Aa! MOVE.B Di, {A5)3 
J893 FEZ? DBCS ADD.L D3,A5; 
5894 FED SLCCFFEE DBF =A, INV; 
3895 FE22AA = 4E75 RTS; , 
3895 

5897 FE22AC = 7A83 INVA: = MOVE@.L 3,05; 
J898 FE22AE = 1245 IRVG{: = MOVE.B (A5) 043 
J899 FE22B@ = 1404 MOVE.B 1,02} 
5988 FE2282 = (285 AND.B DS, Ds 
J981 FE22B4 = 8485 ORB = 05,025 
5982 FE22B6 = 4482 NOT.B 2; 

S983 FE2228 = 282 ADD.B 02,045 
S784 FE22BA = LABI HOVE.B D4, (A5); 
J985 FE22BC = BCI ADD.L = 03,A5; 
3986 FE22BE © SUCCFFEE DBF = 4, INVAN; 
S987 FEZ2C2 © 4€75 RTS3 

3988 

S789 FE2204 = JAICFCOF IRVi: | MOVE.W S$FFFFFCOF,05; 
J91@ FEZ208 = 1215 INVit: «= MOVE.B (A5) 045 
S311 FE22CA = E149 LSL.W By DLS 
S912 FE220C = © 12200881 MOVE.B 1(A5),04; 
S313 FE2208 = 4A MOVE.W 01,025 
S914 FEZ202 © C245 AND. = 05,043 
S915 FE2ZD4 = BAAS OR. = 05,025 
S916 FE2206 = 4642 NOT.W O25 

S917 FE2208 = 0242 ADD. 02,015 
S918 FE22DA = 18416804 MOVE.B D1, 1(A5}; 
S919 FE220E = E849 LSR.W BDL; 
3928 FE22E8 = {Aad MOVE. D1, (A5); 
J921 FE22E2 = OBC3 ADD.L = D3,A53 
3922 FE22E4 © SICCFFE2 DEF = DA INVA 1S 


J923 FE22E8 = 4£75 RTS; 
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3724 

3925 FE22EA 
3926 FE22EE 
5927 FEZ2FA 
3928 FE22F2 
5929 FE22F6 
5938 FE22F8 
S731 FEZ2FA 
J932 FE22FC 
5933 FE22FE 
3934 FE2I80 
3935 FE2304 
3936 FE23@6 
3937 FE2308 


3938 FEZ3GA © 


3939 FE2IGE 
3948 
3944 
3942 
3943 
3944 
3945 
3946 FEZIIO 
3947 FE2S14 
3948 FEZS18 
3949 FE2SIC 
3958 
3951 
3952 FE2I28 
3953 FE2324 
3954 FE232A 
3955 FEZ32C 
3956 FEZ3I@ 
3957 FE2334 
3958 FEZ338 
3959 FE2SIC 
3968 FEZI40 
396! 
3962 
3963 FEZS44 
3964 FE2348 
3965 FEZS4A 
3966 FE2S4E 
3967 FE2352 
3968 FEZI56 
3969 
3978 
J971 FE2S5A 
3972 FE2368 
3973 FE2I62 
3974 FE2966 
3975 FE236A 
J976 FE23bE 
3977 
3978 
3979 FE2372 
3988 FE2376 


kv § 


JAICPASF 
1215 
E149 
12208061 
J4At 
(245 
8445 
4642 
0242 
1841008! 
£049 
1A8i 
DBCS 
Si CCFFDE 
4E75 


S61 GFF G8 
42280081 
b180FF 48 
bOGOF DD2 


b{GOFF58 
902880186800 
678C 
52288808 

bi QGFF48 
b0G0F DBA 
61808114 

b1 GFF IC 
bO0GF DAE 


4a280081 
b78¢ 

G{GQFF2E 
53280061 
51 B8FF 26 
b080F 098 


BCZ28GG4E088! 
628¢ 

bi G8FF 16 
52286881 
b{OGF FRE 
6680F 188 


44286886 
678C 
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INV2: 
INV24: 


MOVE. 
HOVE.B 
L5L.W 
HOVE.8 
HOVE ..W 
AND.W 
OR.W 
NOT.W 
ADD.W 
HOVE.B 
LSR.W 
HOVE.B 
ADD.L 
DBF 
RTS§ 


 SONDERFUNKTIONEN, DIE NIT CONTROL CHARACTERS 


SAM O8K MONITOR VERSION 2.3 


SFFFFFASF 05; 


(A5) 045 
B,D; 
1(A5) 045 
D1, 025 
05,04; 
05,025 
023 
02,015 
D1, 1(A5)5 
8,04; 

D4, (A5)5 
D3,A55 
04, 1NV25 


" GESTEVERT WERDEN 


CARRIAGERETURN: 
BSR.W 
CLR.B 
BSR 
BRA.W 


LINEFEED: 
BSR.W 
CHPI.B 
PEG. 
ADDa.8 
BSR 
BRA.W 
BSR 
BSR.W 
BRA.W 


LFis 


BACKSPACE: 
TST.B 
BEa.S 
BSR.W 
SUBQ.B 
BSR.W 
B52: BRA.W 
CURSORRIGHT: 
CMPI.B 
BHI.S 
BSR.W 
ADDQ.B 
BSR.W 
R2: BRA.W 


CURSORUP: 
TST. 
BES.§ 


INVERT; 
SPALTES 
INVERT; 
RETURNS 


INVERT; 
24, 7EILE} 
LFLS 
1,ZEILE; 
INVERT; 
RETURN; 
SCROLL} 
INVERT} 
RETURN; 


1, SPALTE} 
INVERT} 
RETURNS 


78, SPALTES 
R25 
INVERT; 
{,SPALTE; 
INVERT § 
RETURNS 


LEILE; 
UP25 
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3981 FE2378 
3982 FEZI7C 
5983 FE238@ 
5984 FE2384 
3985 

3986 FE23&88 
3987 FE23aC 
5988 FE2390 
5989 FE2394 
5998 FE2398 
5991 

3992 

3993 FE239C 
3994 FE23A8 
5995 FE23A6 
5996 FEZIAA 
5997 FEQUAE 
3998 

5999 

4808 FE2382 
4001 FEZ3B4 
4902 FE2IBA 
4803 FEQ3BE 
404 

4885 

4986 

4887 

4988 FE2IC2 
4889 FE23C4 
4018 

4Oif 

4012 

4013 

4014 FEZ3CA 
4815 FE23CE 
4616 FE2302 
4817 FE2ID4 
4618 FE23D6 
4619 FE2308 
4828 FEZ3DA 
482! 

4022 FE230C 
4823 FE230E 
4024 FEZIEB 
4925 FEZ3E2 
4026 FE2SE4 
4027 FE23E6 
4828 FE2IE8 
4929 

4058 FEQUEA 
4031 FE2IEC 
4032 FE2SEE 
4033 FE2IF@ 
4034 FEZ3F2 
4035 FE2IF4 
4036 FE2IF8 
4037 FE23FE 


kv 


61 8QFF AG 
55286888 
Gi BOF EFS 
6B8GF DOA 


b1OFEFa 
42280088 
42280801 
biGOFEES 
b80F 054 


b1GGFEDC 
117(881 88088 
42280801 
G1@@FECE 
b8G0F 48 


6188F CBS 
42680008 
6{88FEBE 
bG88F 038 


61888886 
6888F 028 


G1 GQFEAE 


_ b1GAFEI8 


4402 
bBGA 
678C 
3542 
578C 


7AC8 
bRBA 
7A88 
6886 
TAFC 
6882 
TAFB 


788A 

7648 

284) 

CB 4 

093 
SICCFFFA 
OBFC8808808! 
2280 
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BSR.W = INVERT; 
SUBG.B =, ZEILE; 
BSR INVERT; 
UP2:  BRA.W =—-RETURN; 
HOME: = BSR.W INVERT; 
CLA.B = ZEILES 
CLR.B = SPALTES 
BSR.W = INVERT; 
BRA.W = - RETURN; 
HOMEDOWN: 
BSR.W INVERT; 
MOVE.B 24, ZEILE; 
CLR.B = SPALTE} 
BSR.W INVERT; 
BRA.W = RETURN; 
CLEARSCREEN: 
"BSR. = CLRPAGE; 
CLR.W = ZEILE; ICLEAR ZEILE+SPALTE 
BSR INVERT; 'CURSOR EINSCHALTEN 
BRALW = =—- RETURN; 


: LOESCHE BIS ZUM ENDE DER ZEILE 
AB CURSOR POSITION 
ERATEOL: 

BSR ERASE; 

BRA.W RETURN; 


! SUBROUTINE ZUM LOESCHEN SIS ZUM ENDE DER ZEILE 
' 
ERASE: 


BSR.W INVERT; ‘CURSOR AUS 
BSR.W = GETBYTEPOS; 
TST.B 02} 
BHI ERAR; 
BES ERAL; 
SUBQ.W 1,023 
BEG ERA2; 
ERAS: = MOVEG.L = $FFFFFFCO,D5; 
BRA ERAS; 
ERAG: = MOVES.L 8,05; 
BRA ERAS; 
ERAt: = NOVEG.L © $FFFFFFFC,05; 
BRA ERAS; 
ERAZ: § NOVEQ.L $FFFFFFFO,05; 
ERAS: MOVE9.L 18,04; ff RASTERZEILEN 
MOVES.L 64,03; 'ABSTAND DER RASTERZEILEN 
MOVE.L  AS,A4} 'LOESCHE ... 
ERAG: = AND.B = 5, (A4)3 Vox OEM vcs 
ADD.L = D3, A4; 'aee ERSTEN ... 
DBF =A ERAG; tee. BUCHSTABEN 
ADD.L = 1,A5; 


MOVE.L  A5,D4; 
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4A38 FED489 © C27 CBO3F AND.W | $3F 243 

4039 FE2B4 = 743 NOVES.L 62,023 

4040 FE2SBA 8969444 SUB. D4, 023 'TAEHLER IN OBF-LOOP 

4044 FEDSA8 = B14 OM! ERASB; ISPRINGE, WENN SCHON FERTIG 

4h4? FED4BA = 328? MOVE.W 02,043 

4043 FE24@C = -78AA MOVES.L 18,043 '4{ RASTERZEILEN 

4p44 FE24RE =| 284 ERA7: « MOVE.L «AS SA4} 

4045 FERMI = 2484 MOVE.L «94,023 'RUECKSETZE ZAEHLER 

4A46 FED? = ADI ERAS: CLR.B (AM) + 'LOESCHE... 

4A47 FEDM4 =| SUCAFFFC ORF 02 ,ERA8; ' DEN REST DE9 ZEILE 
 #BAR FEDAIR =| BCI ADD.L = 03,5} 'NEUE RASTERZEILE 

449 FEQA © SUCCFFF2 DBF 04,ERAT; 

4A5Q FEZHIE © SIBRFESA ERASR: BSR INVERTS ICURSGR AN 

4954 FER22 — 4E75 ATS} 

4057 7 

4953 

454 ' LOSSCHE BIS TUM ENBE GER SEITE 

4A55 (AB CURSOR POSITION) 

4a5s ! ; 

4957 ERATECE: 

4058 FEE424 «| AL BOFFAS BSR.W 6 -ERASE; 'LOESCHE REST SER ZEILE 

4059 FE2428 = SL BGF DDE BSR.W 6 SETBYTEPOS; 

4eg0 FED420 = ARE MQVE.L A505; 'BERECHME ANFANS DER... 

4Abi t |, NEVEN ZEILE... 

4042 FEDSZE © PABESRRABZEA ADD.L © - 784,053 ts.41 ZEILEN MIT 64 BYTE... 

4067 FEDSI4 = CATC RACE AND.B «© -$C8, 85; IANFANG GER NEUEN ZEILE 

4054 E2438 = 2445 MOVE.L 05,853 

4965 FED4IA 9284 MOVE.L Ab ASS iRAMANFANG -)> Ad 

4954 FEDSIC © OF CaARAaRAG ADDA.L $4888, 44; 'RANENDE = -) Ad 

4067 FEDER? ©9905 SUE.L OAS AN IBERESHNE 7AHL 

4Ab8 FEP442 | EROC MOVE.L Ad, 043 BER YERBLETBENDEN, 

4069 FET44G © «4788 BES ERAP?; ', LOMG- 

4970 FE2488 = EAL LSR.w 2,043 1 MORES 

407{ FE244A = 4290 ERAPE: CLR.L AS) 43 ILOESCHE DIESE 

4A72 FEZ4SC ||| SHCCEFFC Der 04,ER2AP43 

4873 FED4S9 © BARBFCIE FRAP?: BRAW RETURN: 

4074 

4a75 

4874 I SUBROUTINE ZUM SCROLLING GER BILESEITE 

4877 ! 

4A78 FEESS4 =| 24 SCROLL! MOVE.L © Ab.Ag; IRAMANFANG -) AJ 

4079 FEDS56 TEAR MOUE LE OAT, AMS 

“AGRA FED458 «© DOF CHRARG28G ADE.L = 48, A43 tEINE TEILE TIEFE 

4081 FEDSSE = JEICGFAF MOVE.W | J8S5.043 124 TEILEN HOCHRUECKEN 

4082 FE2462 = 260C SCRA: «= MOVE.L «| fA4}+, (AN 43 

4BRT FEDSAE =| SACFFFC OBF 01, S028: 

4oR4 FED4ER © -J2TCSREF MOVE Y 239,04 IREST ER SEITE LOESCHEN 

4085 EDA © 4208 Seki: CLAL fA) 4: : 

$084 FEPGE © SACDFFFE OF DL SCR 

R87 FEZS72 «© 4ETS RTS; 

4088 

Ana? 

498 | DEN PIEPSER AUF DER SUECKMAND ANSPRECHEN 

4094 

4992 FED474 «© @BBRAAR LRRD ae BCLR.B 1, VIAPPCR; 

4093 FEDS7A © 223 CARL RGAA MOVE.L 188808, 04; 


4994 FEZ48@ = 538! BELLL: SUBQ = ty f13 
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4895 FE2482 © GFE BNE BELLL} 

4696 FE2484 «= BF BAG018819 BSET.B 1, VIAPPCR; 

4097 FE248A = BB BOF C44 BRA.W =- RETURN; 

4098 

4699 

4108 ' BEARBEITUNG DER ESCAPE SEQUENZEN 

416{ 

4182 FE2SBE = 117088010082 ESCAPE: MOVE.B 1 ,ESCSW; TEINSCHALTE FLAG 
4163 FE2#94 © GOGGFCSA BRA.W = «RETURNS 

4104 

4105 FE2498 © 44288003 ESON: TST.B ESCOUNT; 'HEUE SEQUENT? 
4166 FE2#9C ~=— 6678 BNE ESONS; 'NEIN: SPRINGE 
4187 

4188 ' IST EINE NEVE SEQUENZ 

4169 FEQ49E © AJFABBRS LEA.L «= JMPTAB2,A1; 'VERTWEIGE ZUR... 
4110 FE2$A2 © SBABFCIA BRA.W = GOTO; TENTSPRECHENDEN ROUTINE 
Ait 

112 

M113 ' TABELLE: ENTHAELT GUELTIGE ESCAPE SEQUENZEN 
it4 

A115 JHPTAB2: 

M16 FE24AR = B3DA OC.W = ASCIION-QUTC25 «= DCW ATS 

Mio FE24A8 = B44 | 

Mi] FE24AA = BJEB OC.H = DEUTSCHON-DUTC25 DCW 'D'; 

4117 FEZ4AC §=— 844 

M18 FE2#AE = 8418 OC.W = ABSADD-QUTC2; OCW 'C'G 

4118 FE24BG = 843 

4119 FE24B2 «= 38 DCW = CURSORON-OUTC2; = DC.W 'B’; 

4119 FE24B4 © 842 

4428 FE24BG6 46 SFB OCW = CURSOROFF-QUTC2; OCW 'E’; 

4120 FE24B8 = BAAS 

4121 FEZ$BA = B4BA OC.# = INVON-DUTC2; DCW TFS 

4121 FEZ4RC = BARS 

M22 FEZ4BE =a? OC.d = INVOFF-OUTC2; OCW G's 

4122 FE2aC8 = -AB47 

AQ2) FEZ4C2 = 42? DC.W = RETURN2-QUTC2; = DEW $8808; 
A127 FE24C4 = BBB 

A{24 

4125 

4126 | SONDERFUNKTIGHEN, OIE DURCH ESCAPE SEQUENZEN SESTEVERT 
At??? WERDER 

4{28 

A129 FEZ4Ch =| 42288004 ASCLIGN: CLR.B = DEUTSCH; 

A138 FEZSCA = 6842 BRA =—sRETURN23 

Mi 

A{32 DEYTSCHON: 

M13 FEZHCC =| LLTCFFFFBBR4 MOVE.B -1, DEUTSCH; 

4134 FE24D2 = GBA BRA RETURN25 

4135 

4136 CURSGRON: 

4137 FEZ#D4 = 44288885 TST.8 © CURSOFF; 

4138 FE24D8 = 6788 BEa.S CONS; 

A139 FE240A «= 42288005 CLR.B = CURSOFF; 

4140 FE24DE © 6{8AFDIA BSR.W INVERT; 

4141 FEZ4E2 = 682A CONt: = BRA RETURN25 

4142 


4143 CURSOROFF : 


4144 FED4ES 
4145 FEDER 
4146 FEZ4EA 
4147 FED&EE 
4148 FEDAF4 
4449 

4159 FEDFS 
HS FED4FC 
4452 

4153 FEDSFE 
4154 FE2S02 
4155 

4156 FE2504 
4157 FE2SQA 
4158 

4159 FE2SQE 
4468 FE25{2 
Nat 

4142 

4163 FE25{6 
4164 FE2S1A 
4165 FE2520 
4145 

4167 FE2522 
4168 FE2524 
4169 FEDS? 

4178 FED52A 
A171 FED52E 
4172 FE2530 
4473 FE2532 
4174 FE2536 
4175 FE253C 
4174 

4177 FE2540 
4478 FE2544 
4179 FE2546 
4188 FE2548 
4181 FED5&C 
4182 

4183 FE2SS@ 
4184 FE2554 
4185 

4185 

4187 

4188 FE2556 
4189 FE25S8 
4198 FE255A 
A191 FE255¢ 
4192 FE25S5E 
4193 FE2560 
4194 FE2542 
4195 FE2564 
4196 FE2566 
4197 

4198 

4199 

4200 FE2568 


kws 


44288885 
668A 

S{28F 8E 
Li7CFFFF ORGS 
6818 


117Ce8818806 
6818 


42280006 
688A 


117088828883 
bBAGFBE4 


4728908? 
baRBFBDC 


98308820 
OC 280801 0083 
THE 


2Fee 

6{88F 054 
201F 
Be3CaG18 
6382 

7418 
11488088 
117088819883 
bB88FBE2 


BeICeG4F 
6382 
784F 
1140080! 
42286083 


5100F 028 
6888 


4088 


5881 
5(82 
3083 
7B84 
7(85 
7086 
7E8? 
6898 


86808068 
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— -ESONS: 


TST.B 
BNE.S 
BSR.W 
MOVE.8 
COFF{: SRA 


CURSOFF § 
COFFL; 
INVERT; 

“1, CURSGFF s 
RETURN? } 
INVON: =NOVE.B 1 IRVFLO} 
BRA RETURN2; 
INVOFF: CLR.B = INVFLG; 
BRA = RETURN25 
ABSADD: MOVE.B 
BRA.W 


2,ESCOUNT 
RETURN: 


RETURN2: CLR.8 
BRA. 


ESCSHS 
RETURN; 


| ABSOLUTE CURSOR POSITIONIERUNG 

ESONS: SUB.E «$28,085 
CAPI.B 1 ,ESCOUNT; 
a 

! POSITIONIERE ZEILE 

MOVE.L DB,-{A7)5 

BSR sIRVERT; 

MOVE.L (A?) +, 085 

CHP.B 24,085 

BLS = ESON4; 

MOVES.L 24,085 

MOVE.B 08, ZEILE; 

HOVE.B 1 ,ESCOUNTS 

BRA.W RETURN; 

' POSITIONIERE SPALTE 

ESONS: CHP.B 79,08; 

BLS ss ESONA§ 

MOVES... 79,08; 

MOVE.B O@,SPALTE; 

CLR.B © ESCCUNT; 

' SCHALTE NEVEN CURSOR EIN 
BSR = sINVERT; 
BRA = RETURN? 


ESONG: 


SAN 68K RONITOR VERSION 2. 


'ESCSW BLEIBT AN 


'SCHALTE ALTEN CURSOR AB 


TESCSW BLEIBT AN 


| TABELLE ZUM UNKODIEREN ASCII -) DEUTSCH 
1 


GTAB? 


DC.W © $4888; 
OC.W = $5BRL; 
OC.W = $5082; 
OC.W = $5083} 
OC.W © $7BB4; 
OC.W = $7085; 
OC.W = $7084; 
OC.W S7E873 
OC.W © $8888; 
CHARS: 


OC.L $08888080; 


DC.L $BBBRR088; OC.W $8080; 


'SPACE 
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4708 FE256C 
4268 FE2578 
4281 FE2572 
4281 FE2576 
4281 FE257A 
4282 FE257¢ 
4282 FE258@ 
4282 FE2S84 
4783 FE2586 
4283 FE2S8A 
4783 FE258E 
4284 FE2599 
4284 FE2S94 
284 FE259R 
4295 FE2S9A 
4285 FEZS9E 
4285 FEZSAZ 
4286 FEZSA4 
4784 FEZSAS 
4286 FEZSAC 
4787 orth 
4387 Fez % 
Fes 
FE258¢ 
4298 FE?5¢8 
4289 FE25C2 
4269 FEZSCh 
4209 FE25CA 
4218 FEZSCC 
82719 FEZSa 
4248 FE25D4 
4211 FEZ5D6 
4741 FE2SDA 
4211 FEZSBE 
212 FE25E8 
4712 FEZ5SE4 
4212 FE25E8 
4213 FE25EA 
$243 FE25EE 
4213 FEZ5F2 
4714 FE2SF4 
4714 FEZSFA 
A714 FEQSFC 
4215 FEZSFE 
42715 FE268? 
4215 FE2bG4 
4214 FEZERB 
$216 FEZb8C 
4716 FEZAIA 
4217 FE26{2 
4247 FEZbL6 
4247 FEZSIA 
4218 FEZAIC 
218 FE2628 
4218 FE2624 
4219 FEZ624 


kws 


88080800 
8088 
26282828 
20882088 
8008 
58595888 
pARARAa8 
A808 
S858F 858 
F8525988 
8888 
2878AG78 
2BF 82888 
2888 
CRC8 1928 
46921889 
A868 
AaOnkE 88 
#88 
1H2g4eN8 
naga 
1d284848 
A201 888 
Bena 
4281918 
18284888 
8888 
88284878 
Aa ZBB008 
aae8 
92823F 8 
20288888 
8988 
20000 
90983838 
6888 
GeRRRHEF 8 
ABGG8H8 
8888 
9809888 
B8383868 
9688 
8881823 
49200088 
4828 
78885848 
0888 7288 
9889 
PREa #7278 
28287888 
9929 
79889318 
2040F 888 
9888 
F§182819 


OC.L 


OC.L 


OC.L 


pC.L 


i 


O¢.L 


Df.L 


O¢C.L 


O¢.L 


bC.L 


DCL 


OC.i 


OC.L 


O¢.L 
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$28262828; 


$50585200; 


$5059F 856; 


$2378A879; 


$08031 923) 


$20595068; 


$19294088; 


$19284040; 


$48201019; 


$0829A873; 


$802020F 8; 


$80880800; 


$A88800F 8; 


$98009808; 


$96981020; 


$708598A8; 


$29602823; 


$73888813; 


$F8182819; 


DC.L $28802000; 
DC.L segaaaaaa; 
DC.L $F8505900; 
DC.L $28F02000; 
OC.L $40961880; 
OC.L $A89858095 
OC.L sneaagaed; 
DCL 940281980; 
DC.L $18294000; 
DCL $A8290080; 
DC.L $29290808; 
DC.L $88003038; 
OC.L sagnanaed; 
Nut $00303008; 
OC.L $4ag08008; 
OC.L $088878005 
OC.L mill 
OC.L $2940F 8003 


OC.L $888879885 
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OCW $8800; 


OC.4 $0808; 


OCW $8808; 


OCW $8888; 


DCW $0008; 


fi.d $8088; 


Md SBR8R; 


DC.a $H888; 


QC.W $8888) 


OC. $8088; 


OC.W $8808; 


DC. 4 $6088; 


DC. 4 $8808; 


C.a $6088; 


OCW $8888; 


D0. 4 $8088; 


DCW $0888; 


C4 $8888; 


DCW $8888; 


9 


4219 FEZS2A 
4219 FEQG2E 
zed FEZ5 38 
4228 FE2G34 
4228 FE2&38 
4221 FEZSSA 
4221 FEZS3E 
$221 FE2642 
4222 FE2b44 
4222 FE2846 
4222 FEZb4C 
4223 FEZEAE 
4223 FE2852 
4223 FE2656 
4224 FEZ658 
4224 FE2O5¢ 
4224 FE2b68 
4225 FE2642 
4225 FE2b66 
4225 FE266A 
4226 FE2b6C 
4226 FE2678 
4226 FE2674 
4227 FE2676 
4227 FEZH7A 
4227 FE2O7E 
4228 FE2680 
4228 FEZ684 
4228 FE2688 
4229 FE268A 
4229 FEZb8E 
4229 FE2H92 
4230 FE2694 
$238 FE2698 
4238 FEZ69C 
4231 FE2S9E 
4231 FE2bA2 
4231 FE2bA6 
4232 FE2bA8 
4232 FE2bAC 
4232 FEZ6B8 
4233 FE26B2 
4233 FEZ6B6 
4233 FE26BA 


4234 FE2KBC 


4234 FE26CO 
4234 FE2bC4 
4235 FE26C6 
4235 FE26CA 
4235 FE26CE 
4236 FE2608 
4236 FE2604 
4236 FE2608 
4237 FE26DA 
4237 FEZHDE 
4237 FE26E2 
4238 FE26ES 
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8587208 
ABeR 
19385898 
FRL 81668 
9088 
Fa80F 288 
98887888 
8098 
J84880F8 
88887808 
AGRE 
F888 1828 
40404008 
A888 
79888878 
88887800 
9008 
70888378 
08185808 
808 
90893838 
08383008 
9888 
8080838 
538883838 
6888 
19204680 
46201008 
8808 
HRRBF 888 
F 8800888 
8888 
40201088 
18204008 
0008 
78880816 
28882808 
9838 
JO48B8A8 
B8403800 
8088 
TA88REFS 
88888808 
8888 
FQ8888F8 
8888F 900 
0808 
78888886 
8088788 
8688 
E988 888 
88985608 
9088 
FA8G8GF 8 
8880F 888 
0808 
FS8G8F 8 


OC.L 


$18385990; 


$FA8GF A88; 


$384080F8; 


$F8081828; 


$78888878; 


$78888878; 


$80083038; 


$aaaaaazas 


$18284080; 


$A000F 800; 


$46261808; 


$78880810; 


SIB48BBAR; 


$788888F 8; 


SFABRRRFO; 


$70888080; 


$E69888885 


$F B8G80F 9; 


SFB8G80F 8; 


SAM 68K SONITOR VERSION 2.2 


OC.L SF1G1988; DCW $AbR8; 
DC.L 388887008; 0C.4 30088; 
OC.L $88887008; OC. $8088; 
DCL $40404000; OCW $8008; 
DCL $88887800; OCW seaae; 
OC.L $88186008; OC. $0088; 
OC.L $08303000; DCW $0008; 
OC.L svesemaes OC.W $6808; 
OC.L $49201088; DC.W $0008; 
OC.L $FRRRBR0R; DCW $0088; 
OC.L $18284000; DC.W $0000; 
OC.L $28R82800; DC.W $8080; 
OC.L $B8403808; OCW $8008; 
O¢.L sncuassens OC.a $8900; 


OC.L S8888F A080; 0C.W $0080; 


DC.L $88887808; DC.W $0088; 


DC.L $8890EG08; OC.W $8088; 
OC.L $8080F 800; DCH $8080; 


OC.L $80868000; DCW $8080; 


ee 


13.05.85 


4238 FE2GE8 
4238 FE26EC 
4239 FE2bEE 
4239 FE2GF2 
4239 FE26F6 
4240 FE26F8 
4248 FE2OFC 
4248 FE2788 
A241 FE2782 
4241 FE2706 
4241 FE27BA 
4242 FE27@C 
4242 FE27TIG 
4242 FE2714 
4243 FE27{6 
4243 FE27TIA 
4243 FE2TLE 
4244 FE2728 
4244 FE2724 
4244 FE2728 
4245 FE272A 
4245 FE272E 
A245 FE2732 
4246 FE2734 
4246 FE2TI8 
4246 FE27IC 
4247 FEQTIE 
4247 FE2742 
4247 FE2744 
A248 FEZ748 
4248 FE2TAC 
4248 FE2756 
4249 FE2752 
4249 FE2756 
249 FE275A 
4250 FE275¢ 
4756 FE2768 
4256 FEZ7O4 
A251 FE27b6 
4251 FEZ7GA 
A251 FE27bE 
4252 FE277@ 
4252 FE2774 
4252 FE2778 
A253 FEZTIA 
4253 FEZ77E 
4253 FE2782 
4254 FE2794 
4254 FE2788 
4254 FE278C 
4255 FE278E 

295 FE2792 
4255 FE2796 
4256 FE2798 
4256 FE279C 
4256 FE27TAG 
4257 FE27A2 


kv 


88808008 
bane 
78888898 
88887806 
8608 
888888F 8 
86884808 
9808 
78282828 
20207888 
A008 
38181818 
16986888 
8088 
88904808 
48988888 
Baa8 
98888088 
BO80F 688 
9868 
BBD8ABAS 
88888800 
8888 
B888C8A8 
78888808 
8068 
78888888 
88887868 
Agea 
FARSBEFO 
80808888 
8068 


— 78888888 


8986888 
8888 
FOR8aaF a 
AGI88868 
B88 
78808878 
6G8F 888 
ty 
FaZ82028 
20282888 
R008 
68888888 
88887208 
R688 
88888838 
88582888 
Ag88 
88886848 
A8A85888 
8008 
88885928 
58888888 
0899 
88886858 
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OC.L © $78888098; 


OC.L $888888F8; 
DC.L  $78282628; 
OC.L © $381818185 
OC.L  $BB9BAGC8; 


DC.L $88888880; 


O¢.L "SAMAR 
OC.L $8888CBA8; 
DC.L  $78888888; 
OC.L $FR8888F8; 
DC.L $78888888; 
DC.L $FO8888F 8; 
OC.L  $78808878; 
OC.L $F8282828; 
OC.L  $88888888; 
DC.L $88888888; 
DC.L $888888A8; 
DC.L $88885028; 


DC.L $88888858; 


SAM 68K MONITOR VERSION 2.3 


OC.L $88887800; OC. $8290; 
DC.L $88888808; OCW $8988; 
DC.L $282876085 OC.4 $8888; 
DC.L $1B986088; DC.W $8888; 
OC.L SAG7HR8GR; OCW $8688; 
OC.L $808QF 888; DC.W $9088; 
DC.L $88688800; DC.W $8888; 
OC.L $98888800; DC.W $8888; 
DC.L $88887000; 0C.4 $8090; 
OC.L S8BRA8H88s DCW $8008; 
DCL $A8906808; OC.4 $8888; 
OC.L $AB7BBRGG; DCW $8008; 
DC.L $BGBF AGO; DC.W $8888; 
OC.L $20202000; OC. $8008; 


OC.L $88887800; DC.W $8000; 


DC.L $88502000; DCW $0080; 


OC.L $AGA85060; OCW $8888; 
DC.L $50888808; DC.W $6088; 


OC.L $28282000; DC.W $8808; 


Y 


13.85.85 


4257 FEZTAG 
4257 FE27AA 
4258 FEZ7AC 
4258 FE2788 
4258 FE27B4 
4259 FE27B4 
4259 FEQTBA 
4259 FEQ7BE 
4268 FEZ7¢9 
4268 FEZ7C4 
4268 FE27C 

4261 FE27CA 
4261 FEZ7CE 
4261 FEZ7D2 
4252 FE27D4 
4262 FE27D8 
4262 FE270C 
4263 FE27DE 
4263 FE2TE2 


4253 FE2TES 


4264 FE2TES 
4264 FE2TEC 
4264 FE2TFQ 
4265 FE2TF? 
4265 FE27FS 
4265 FE27FA 
4266 FE27FC 
4266 FE2800 
426 FE2BO4 
4267 FE28R4 
4267 FE2804 
4267 FE2B9€ 
4268 FE2810 
4268 FE2844 
4268 FED&18 
4269 FE2@IA 
4269 FEZRIE 
4269 FE2822 
4278 FE2824 
4278 FE2828 
4278 FE282¢ 
4271 FE282E 
4271 FE2832 
4271 FE2836 
4272 FE238 
4272 FE283C 
4272 FE2849 
4273 FE2842 
1273 FEA 
4273 FEZR4A 
4274 FE2B4C 
4274 FED85@ 
4274 FE28S4 
4275 FE2856 
4275 FE2B5A 
4275 FE2B5E 
427 FE2860 


kw 


29202088 
8288 
F 9881928 
4OdGF 800 
nage 
79404048 
4407008 
A888 
AABA4828 
18888088 
8888 
TALGL G18 
18187888 
Aaaa 


207 8A828 


20202688 
9008 
paaaRAaA 
F8ae 
46201088 
88900808 
8008 
20207608 
78887868 
8888 
§G80F 088 
8888F 808 
8098 
8097288 
88887008 
9288 
48887888 
88887808 
8888 
68997888 
FA887888 
A888 
J848E240 
42494068 
9288 
0606898 
88985808 
7888 
8880F 288 
8688800 
9888 
28806828 
28287888 
A088 
18885318 
18101898 
5888 
88899948 
08888868 
8888 
66282028 


b¢.L 


OC.L 


OC.L 


DC.L 


OC.L 
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$F8881828; 


$78404048; 


$80884028; 


$78181818; 


28784828; 


$HR800000; 


$40201 000; 


$00007088; 


S888GF 888; 


$00007888; 


$08087888; 


$888878885 


$JB58E840; 


$40086898; 


$8880F 088; 


$26006020; 


$10003018; 


$888070A8; 


$66282828; 


SAM 48K MONITOR VERSION 2.3 


DCL $4B88F 888; DC.¥ $8000; 


OC.L $4B407000; OCW $8800; 


OC.L $10880880; DC.4 $8008; 


OC.L $10107008; 0C.w $0008; 


DCL $28202000; OCW $8008; 


OC .i S$OORARRDG; OCW $F88B; 


DCL $00088000; DCW $8880; 


DC.L $78887800; DCW $8008; 


OC.L $BRb8FOG8; DC.W $8088; 


DC.L $80887080; DC.W $0088; 


OC.L $88887808; OC.W $8008; 


OC.L $F8807008; OC.W $8080; 


OC.L $48404000; DCW $8800; 


DCL $88986808; 0C.W $7880; 


DC.L $88888880; DCW $8808; 


DCL $20207000s DCW Sanaa: 


OC.L S1B181098; OC.¥ $4889; 


OC.L $00888800; DC.W $8000; 


OC.L $28207880; OCW $0080; 


13.85.85 


4276 FE2864 
4276 FE2868 
4277 FE286A 
4277 FE2B6E 
4277 FE2872 
4278 FE2874 
4278 FE2878 
4278 FE287C 
4279 FE287E 
279 FE2882 
279 FE2886 
4288 FE2888 
4288 FEZ88C 
4288 FE2898 
4281 FE2892 
4281 FEZ894 
| ARB FEZB9A 
4282 FEZ3C 
4282 FEZRAR 
4282 FEZRAS 
4283 FEZSA6 
4283 FEZBAA 
4283 FEZ8AE 
4284 Fe28Ba 
4284 FE28B4 
4284 FEZ8B8 
285 FEZRBA 
4285 FE2SBE 
4285 FE28C2 
4286 FEZRC4 
4286 FE28C8 
4286 FE28CC 
4287 FE28CE 
4287 FE2802 


BT FR 


4288 FEZ8DC 
4288 FE28E8 
4789 FE2RE2 
4289 FEZBEG 
4289 FE28EA 
4290 FEZREC 
4299 FE2SF@ 
4296 FE2aF4 
A291 FE28F4 
4291 FE28FA 
4291 FE28FE 
292 FEZ990 
4292 FEZ904 
4292 FE2988 
4293 FEZ9@A 
4293 FEZ?RE 
4293 FE2%{2 
4294 FEZ14 
4294 FE2718 
4294 FE2SIC 
4295 FE2ME 


kws 


20267888 
6800 
RARODBAB 
AGABABGA 
8088 
ROARF ARS 
88888888 
8988 
98007888 
88887828 
2408 
RaC2bG88 
4882 
ARAB SESS 
88986888 
Agee 
ARBEBACS 
88808288 
aen8 
98887388 
7AGRF B88 
8689 
40496840 
40483006 
Age 
98008888 
§8986888 
8088 
96888888 
88582888 
6808 
96006868 
88485088 


thoessse 


20588888 
8888 
0008888 
88986808 
7888 
AREF R18 
2040F 268 
8828 
38484988 
4A483808 
A888 
28282828 
28282888 
A888 
bO181808 
16186888 
8888 
80084848 
18868888 
8608 
A85@A858 


O¢C.L 
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$H00000A8; 
$O000F 088; 
$00007888; 
$2000B8C8; 
490006898: 
sHABABACES 
rin 
$40406040; 
$00008888; 


$82808888; 


$89208888; 


$08008856; 
$80008888; 
$0080F 818; 
30464080; 
$28202028; 
$661819885 
$000846A8; 


$A858A858; 


SAM 68K MONITOR VERSION 2.3 


DC.L $ABABARGG; DC.W $0600; 
OC.L $88888808; OC.W $8900; 
DC.L $88887800; 0C.W $8800; 
DC.L $88C8B889; 0C.W $8888; 
Of .L $8898b808) DC. $8808: 
DCL 888888008; OCW $8888 
OC.L $72R8F AAG; OCW $2888; 
OC.L $48485008; O¢.8 $3888; 
OC.L $88986500; 0C.8 $2888; 
OC.L $88582808; DC.W $8888; 


DC.L $88485908; DC.W $8888; 


DC.L $20588800; DC.W $8888; 
DCL $88986808; OCW $7888; 
OC.L $2040F 888; OC. $8808; 
DC.L $40403000; OC.W $8888; 
DC.L $20202808; DC.W $8688; 
O¢.L storgnnce; OC.W $8880; 
OC.L $19000088; OCW $8888; 


DC.L $AR5GA85O; DC.W A888; 


My 


13.85.85 


4295 FE2922 
4295 FEZ926 
4296 

4297 FE2928 
4297 FEZ920 
4297 FE293@ 
4298 FE2932 
4298 FE2936 
4298 FE29IA 
4299 FEZIIC 
4299 FE294a 
4299 FEZ944 
4388 FE2944 
4388 FEZ94A 
4380 FEZPE 
43at FE2939 
4381 FE2954 
4381 FEZTS8 
4302 FE2954 
4382 FE295E 
4382 FEZ?42 
4383 FEZ?44 
4383 FEZ948 
383 FEZIAL 
4384 FEZIGE 
$384 FEZ972 
4384 FE2976 
4395 


. a 
5177 


kws 


A&SBA858 
A&G 


SAIACRAR 
98583678 
5882 
§8728888 
Fe8888e0 
8008 
88728888 
88587888 
8808 
ABSBA888 
88887206 
ba88 
$482 7298 
79857888 
899 
88597888 
88887008 
8058 
§8008888 
§8984808 
Aaea 
AIBABER 


re 3 
OC.L 


MeL 


O¢.t 
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Sb89RC8A85 


$887288835 


$88 748888; 


$ABB8A883; 


$88297008; 


$88007288; 


$88808883; 


S68 90ABES | 


OC.L $985839985 
OC.L $F&888808; 
OC.L $88887908; 
OC.L $88887988; 
OC.L $78887800; 
OC.L $8888 7900; 
OC.L ssanacaes 


DC .L $9899E088; 


LIST 4; 


SAM 68K MONITOR VERSION 2.3 


DCW $6088; 
DCW $0888; 
OC .a $8988; 
DC.w $0088; 
DCW $008a; 
OCW $8908; 
DCW $0000; 


DC.4 $8908; 


'PARAG 


'AE 


'OE 


WE 


lae 


'gp 


yp 
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SYMBOL BLOCK IEILE LAENGE = WERT 
ABORTPIAL 963 $FEG878 = PC-R. 
ABOTSKMC 1065 $FEG9B8 PC-R. 
ABSADD 415 $FE2504 PC-R. 
ACIAICO 116 asFFFFaCeS 
ACIALDA if! asFFFFaCO! 
ACIALINI 693 SFEBGIA PC-R. 
ACIALINL 586 $FEGGG2 PC-R. 
ACIAIOU! 784 $FEG638 = PC-R. 
ACIAIOUL 782 $FEG628 PC-R. 
ACIA2CO 112 asFFFF8C@7 
ACIAZDA 113 asFFFFaces 
ADORESSE 1992 SFEIZDA PCR. 
ADREG 1258 SFEABSC PC-R. 
AMAL TESTALLE 4828 SFFFER4BG 
AREYOU 3383 LONG $FE2008 PC-R. 
ASCIION 4{29 SFE24CS = PC-R, 
ASSEMBLE f86 a${B4E88 
ASSEMBO 1922 $FE{212 PC-R. 
ASSHBEG ib) LONG assre 

ASSWEND 76 LONG a$82 

ASTERR 1654 $FEGF5@ = PC-R. 
ASTO! 1652 SFEGF46 = PC-R. 
ASTOHK 1643 $FEGF2A PC-R. 
AUTOINTY 2253 a$78 

AUTOVS 138 agit 

AUX 2618 $14 

BACKSPACE: 3962 $FE2344 = PC-R. 
BORIVE 2298 BYTE $12(Ab) 

BELL 4992 $FE2474 PC-R. 
BELLL 94 $FE248@ = PC-R. 
BHEAD 2292 BYTE $14(AG) 

BRAX TESTALLE 4829 SFFFEGGEO 
BNUMBER 2294 BYTE $16 (Ab) 
BOOTBLOCK 2189 a$868 
BOOTDRIVE 2193 LONG a$580 

BOOTERR 2867 SFEL4CF PC-R. 
BOOTLOOP 2219 $FE1638 PC-R. 
BPRG bf LONG a$5A8 

BPTAB 2638 $FELS56 = PC-R. 
BREAKIN 426 $FEG382 PC-R. 
BREAKING 447 SFEBICA PC-R. 
BREAKIN? §5{ SFEGID4 =PC-R. 
BREAKING 445 $FEGIC2 PC-R. 
BREAKP 48 SFEBIFA PC-R. 
BRKVCT 125 a$88 

BS? 3968 $FE2356 PC-R. 
BSECTOR 2293 BYTE $15(A6) 

BTRACK 2274 BYTE ${J(AG) 

BUFFER 9 WORD a$47E 

BUSERR 2013 SFELJ@A PC-R. 
BUSERRORV 128 a$8 

| 3648 $FE2674 PC-R. 
CALLCOM 497 $FEQ43E PC-R. 


CALLCOM! 385 $FEBA56 §PC-R. 


13.85.85 kus 


SYREGL 


CARRIAGERETURN 
CASES 
CASEAG 
CASEI 
CASELG 
CASE? 
CASEZ8 
CASES 
CASES@ 
CENTRWAL 
CENTTEST 
CHAINITAB 
CHARS 
CHBINITAB 
CHECKR 
CHECKW 
CHECKWE 
CHECKW2 
CHRGI 
CHROUT 
CHROUT82 
CHROUTS 
CIP 
CLBUFFER 
CLC 
CLEARBP 
CLEARBP{ 
CLEARBP3 
CLEARRG 
CLEARRGS 
CLEARSCREEN 
CLRCLC 
CLROK 
CLRPAGE 
CHPNAM 
CHPNAMI 
CHPNAN9 
COFF{ 
COLOST! 
COLOSTRT 
COMBUFF 
COMEND 
COMRAN 
CONTAB 
CONt 
CONTROLC 
CONTROLCO 
CPURANEND 
CPURAMST 
CRTADA 
CRTREG 
CSPECIFY 
CTf 

CT2 
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BLOCK 


TESTALLE 


TESTALLE 
TESTALLE 


TESTALLE 
TESTALLE 


TEILE 


SAM 48K MONITOR VERSION 2.3 


LAENGE 


WORD 
LONG 
WORD 


WORD 
WORD 
BYTE 
WORD 


WERT 


$FEZ3i8 PC-R. 
SFE2{74 PC-R, 
$FEZI7A PC-R, 
$FEZ199 PC-R, 
$FEZ1AG = PC-R. 
SFEZIC8 = PC-R. 
$FE2108 PC-R, 
$FE2154 PC-R. 
$FE2i5A PC-R, 
$FEG7A4 = PC-R. 
$FE2B68 PC-R. 
$FEGI7 = PC-R. 
$FEZ568 PC-R. 
$FEG186 PC-R. 
SFELDBE PC-R. 
SFEIDAS PC-R. 
$FEIDB4 PC-R, 
SFEIDB8 PC-R, 
SFEZIS4 = PC-R. 
$FE212A PC-R. 
SFE2I3C = PC-R. 
$FE214@ PC-R. 
${ 
SFEQ4FE PC-R, 
$ 

S$FEGIDA PC-R. 
$FEQJEE PC-R. 
SFEGIF8 PC-R. 
$FEQ402 PC-R. 
SFEG4GC PC-R. 
$FE23B2 PC-R. 
$82 

$8{ 

$FE286A PC-R. 
SFELE8@ = PC-R. 
SFELEGE PCR. 
SFELE9C §PC-R, 
SFE24F4 = PC-R, 
SFERICE PC-R. 
$FEGB54 PC-R, 
48628 
a$67A 

$8 (Ad) 
SFEL40C PC 
SFE24E2 PC 
$FEQ87C PC- 
SFEG816 PC 
$20888 

$800 

aSFFFF SAG! 
aSFFFFBAGS 
SFELOCG PC-R. 
SFE2B82 PC-R. 
$FE2B98 PC-R, 
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SYMBOL BLOCK TEILE © LAENGE = WERT 
C13 TESTALLE att SFE2BAB PC-R. 
CTERR TESTALLE 4716 SFE PC-R. 
cTMt TESTALLE 4758 SFE2DTA PC-R. 
CTH TESTALLE 4778 SFE2EKR PCR. 
CTH TESTALLE 4773 SFE2EBE PC-R. 
CTH TESTALLE a7 SFE2ECS PC-R. 
CTHS TESTALLE 4780 SFE2EDB PC-R, 
CTMS TESTALLE 4783 $FE2FQ9 PC-R, 
CURSOFF Joa? BYTE = $548) 
CURSORH 3a! $E 
CURSORL 3612 $F 
CURSOROFF 4143 $FEDNEA PC-R. 
CURSORON 4136 SFE2ADS PC-R. 

- CURSORRIGHT 3978 SFE235A PC-R, 
CURSORUP 3978 $FE2372 PC-R. 
DATENDA READOMA 2549 SFE(8BG PC-R, 
DATRES 1276 SFEOBGE PC-R. 
DATREGI 1277 SFEQBT2 PC-R. 
DATREGL (294 SFEQBIA PC-R, 
DATREG2 1295 SFEOBIE PC-R, 
DATREG3 1299 SFEBBAG PC-R. 
DORA 2608 $4 
DECODE 357 $FEB2C8 PC-R. 
DECODES 358 $FEB2CC PC-R, 
DECODE! Tol $FEO2D4 PC-R, 
DECODES 372 SFEQ2FA PC-R. 
DEFASSB 108 $4908 
DEFASSE 109 S7FFE 
DEFWORK 135 SI7FF 
DELAY 2910 SFEIBEO PC-R. 
DELAY! 2941 SFEIBES PC-R. 
DELETFI 2843 $FE1B38 PC-R, 
DELMES 2638 28500 
DELTAP 264 SFELQ2E PC-R, 
DELTAP! 2653 SFELNR PC-R, 
DELTAP2 2658 SFEL95C PC-R. 
DELTAP24 2659 SFEI960 PC-R, 
DEUTSCH 3606 = BYTE = SAAR) 
DEUTSCHAN 984 SFEQBBA PC-R. 
DEUTSCHAUS 198 SFEGBCC PC-R. 
DEUTSCHON 4132 SFE2ACC PC-R. 
DISBP 482 SFEOAL4 PC-R. 
DISRP9 492 SFEQAIC PC-R, 
DISERR 3327 SFELFG4 PC-R. 
DISERRI 3329 SFEIFOC PC-R, 
DISERR? 3334 SFELFTA PC-R. 
DISERR3 3335 SFEIFEQ PC-R. 
DMAREQUEST © READDMA 2544 SFELBAA PC-R. 
DRO 2260 SFEISF8 PC-R, 
DRIVEOK TESTRES a SFELA PC-R. 
OTL 2272 SFF 
DUBNAK 3378 = LONG »=s«SFEAFFA PC-R. 
DUMMY! 9 WORD —asa7e 


DUMPS 1441 SFEGDI6 PC-R. 
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DURPS 1442 SFEQDLA PC-R. 
DURPEND 1458 SFEQDSC PC-R. 
QUAM 1424 SFEGCES = PC-R, 
DUHPN4 1436 $FEGDAS PC-R. 
DUMPHER 1485 $FEACAC PC-R, 
DUMPHZ 1414 SFEGCCE PC-R. 
QUMPHZ! 1415 | SFEGCCE PC-R. 
DUNPWE! 1454 SFEGDSE PC-R. 
EDITOR 187 09107488 
ENDBOOT 2258 $FE1bb4 = PC-R. 
ENDERAM 2299 BYTE $19(A6) 
ENDFILL 7 1156 SFE@AGE PC-R. 
ENDKENN Ri VORD asaie 
ENDKENNU 64 WORD asset 

ENDMOVE 1138 SFEGAS@ =PC-R. 
ENDSERVICE INTSERVICE api? SFEL8F2 PC-R. 
ENDSTAN 134 $404 

ENDTREE 1149 SFEGQABA PC-R. 
ERA@ 4824 $FE23E9 PCL-R. 
ERAL 4926 SFE2SE4 PC-R. 
ERA2 4028 SFE2IE8 PC-R. 
ERAS 4822 $FE230C PC-R. 
ERAS 4838 SFE2SEA PCR. 
ERAG 4033 SFE2IF@ = PC-R. 
ERAT aad SFEZ4@E PC-R. 
ERA8 4846 $FE2412 PC-R. 
ERA9B 4658 SFE2H{E PC-R. 
ERAP{ 4071 SFE244A PC-R. 
ERAP? 4073 $FE2458 PC-R. 
ERASE 4014 SFEZICA PC-R. 
ERATEOL 4607 $FEZIC2 PC-R. 
ERATEOP 4657 $FE2424 PC-R. 
ERROBUS 2856 SFEL425 PC-R. 
ERRONPC 2063 SFEL48C PC-R. 
ERRORAB 2661 SFEL474 PC-R. 
ERRORACC 2655 SFEL4{5 PC-R. 
ERRORAD 2854 $FEL487 PC-R. 
ERRORENDE READDMA 2553 SFE{8C4 = PC-R. 
ERRORFLAG 2298 BYTE $18 (Ab) 
ERRORIL 2057 SFEL42F PCR. 
ERROROU | 2659 SFEL44F PC-R, 
ERRORPC 2962 SFEL484 = PC-R. 
ERRORPR 2868 SFEL468 = PC-R, 
ERRORZE 2958 SFEL443 PC-R. 
ERRTEX 3339 LONG SFELFBA PC-R. 
ESCAPE 4192 $FE248E PC-R. 
ESCOUNT 3685 BYTE $3(A8) 

ESCSW 5684 BYTE $2/A8) 

ESON 4105 $FE2498 = PC-R. 
ESONS 4163 $FE2516 PC-R. 
ESON4 4173 $FE2532 PC-R. 
ESONS 4477 $FE2548 PC-R. 
ESON6 4186 $FE2548 PC-R. 


EWORKEND b3 LONG a$5£8 


aati — 
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FASCIION 999 $80 
FDCDMA 2249 aSFFFFRES3 
FOCDMATC 2250 asFFFFBEQ3 
FOCHSR 2248 asFFFF8DAt 
FOCREAD 2277 «=—s«BYTE. = sSFELG78 PC-R. 
FOCRECAL 2278 «= s:BYTE. ~=—sSFEMG7A. PC-R, 
FDCSEEK 2279 «BYTE. =—sSFELG7C.PC-R. 
FOCSENSINT 2282 «BYTE =—sSFEM682.PE-R. 
FOCSENSSTAT 2281 «BYTE =—sSFEM48@ PC-R, 
FOCSPECY 2288 «=sBYTE. «=—s«SFELATE PC-R. 
FODNOTREADY 2598 $FEL926 PC-R. 
FDEUTSCHAN 110 $80 
FILLCOM 114 SFEBAS2 PC-R. 

— FILLLOOP 115! SFEDALA PC-R. 
FINDHB 1665 $FEOFGE PC-R. 
FINDH! 1667 $FEBF72 PC-R. 
FINDH2 1675 $FEOFBE PC-R. 
FINDHEAD 1658 $FEOFS2 PC-R. 
FLOPPYREAD  -FLOPPYREAD «=©-s«2404 $FEL758 PC-R. 
FORWARD 3292 SFEIF2C PC-R, 
FSTADRH 3413 $¢ 
FSTADRL 3at4 $0 
FUDT 2629 $86 
5B 3829 SFE2218 PC-R. 
GEFUNDEN 138 $FEQBBA PC-R. 
GETBYTEPOS 3819 $FE2288 PC-R. 
GETHEAD 3176 SFELEBA PC-R. 
GETHEAD! 3184 SFELE2§ PC-R, 
GETHEAD? 3184 SFELEZE PC-R. 
GETHEADI 3188 SFELES4 PC-R, 
GETPARAN GETPARAN 3457 SFE2080 PC-R. 
GETSYSC 295 SFEBLIC PC-R. 
GOCOM 518 SFEQAGE PC-R. 
G0cOMt 548 SFEBACB PC-R. 
G0C0M2 531 SFEQAIB PCR. 
G0COM3 537 SFEAGAG PC-R. 
G0COMs 526 SFEQABA PC-R. 
GOCOMS 550 SFEBADB PC-R. 
GOCOMERR 557 SFEQAEE PC-R. 
6070 3698 SFE2BDE PC-R. 
GOTO! 3499 $FE2E2 PC-R. 
GPL 21 $ 
GTAB 4188 = WORD. «=s«SFE2556° PC-R. 
HEADLTINE 2257 $3E 
HEADUTINE 2258 $f 
HOME 3986 $FE2388 PC-R. 
HOMEDOWN 3992 SFE239C PC-R. 
HOSTEND 471 $FEQ7BQ PC-R. 
HOSTTR 855 $FEQ774 PC-R. 
HOSTTRI 859 $FEQ7B8 PC-R. 
HOSTTR2 Bb SFEQ79E PC-R. 
IER 2613 $tA 
IFR 2612 $18 
ILFILE 3378 = LONG «= SFE2@{E  PC-R. 
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ILLINSTR 1997 SFELZEA PC-R. 
INA! 833 $FEG7IC PC-R. 
INAZ B4{ SFEGTSC = PC-R. 
INAKZ 843 $FEB7S8 =PC-R. 
INCH 769 $FEGb98 =PC-R, 
IRCHOLS 734 SFEBGBS = PC-R. 
INCHOLS 784 SFE@bC? PC-R. 
INCHO2 Ti4 SFEBGAA PC-R. 
INCHOS MW $FEBHB4 = PC-R. 
INTACIAS 249 SFEQITE PC-R. 
INICERT 825 SFE@722 PC-R. 
INICHE | 257 SFEBIS6 §PC-R. 
INIDRAM 216 SFEGGES = PC-R. 
INILOOP 252 SFEGL4A PC-R. 
INTLOOPE 259 SFEGISE PC-R. 
INIPIAS ii $FEAIGC PC-R. 
INIRET 2b4 $FEG16A PC-R, 
INITERT 3621 $FE2838 = PC-R. 
INITREIBER INITREIBER 2385 $FE1b84 = PC-R 
INLIDEL 387 $FEQ538 = PC-R. 
INLIKE 363 $FEB4FG PC-R. 
INLINEG 369 $FEG592 PCR. 
INLINE! 378 SFEG5@4 =PC-R. 
INLINE2 385 $FEB52E PC-R. 
INTERR TESTALLE 5187 SFESIOG = PC-R. 
INTFLAG 2297 BYTE $17 (AG) 
INTINPUT 32 BYTE a$556 
INTSERVICE INTSERVICE 2564 $FE{8D8 PC-8. 
INVE | 5897 SFEZ2AC PC-R, 
INV6t 5898 SFE22AE PC-R. 
INV! 3989 $FE22C4 = PC-R. 
INVE1 3918 $FE2208 PC-R. 
INV2 3925 $FEZ2EA PC-R. 
INV24 5926 SFEZZEE PC-R. 
INV] 3885 $FE2294 PC-R. 
INVS1 3886 $FE2296 PC-R, 
INVERT 3872 SFE227A PC-R, 
INVERT 5875 SFE2282 PC-R, 
INVFLG 3688 BYTE $6(A8) 

INVOFF A{53 SFE24FE PC- 
INVON 4158 $FE24F6 PC- 
IOFLAG 4§ LONG a$546 

IOLIST 1354 $FEACZ8 PC-R. 
IOLIST4 1358 SFEQCI4 = PC-R. 
IOLIST2 1362 SFEACSE = PC-R, 
IQLIST3 1372 $FE@CG2 PC-R. 
IOLIST4 | 1376 SFE@COA PC-2, 
IQLISTS 138? SFEQCBA PC-R, 
IOLIST4 1393 —SFERCIG  PC-R. 
IOLISTE 1398 SFEGCAG PC-R, 
JHPTAB 3789 WORD SFE2OF4 PC-R. 
JNPTAB2 A115 WORD SFE24AG PCR, 
LASTIO 49 LONG ass4A 


LFi 3958 $FEZT38 = PC-R. 
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LINEFEED 3751 $FEZ328 PC-R. 
LISTRE? 1337 SFEGCBA PC-R. 
LISTRES 1312 $FEQBBE PC-R. 
LISTRES! 132 SFEBBES §PC-R, 
LISTRES2 132i SFEBBES = PC-R. 
LISTREGS 1344 $FEQCI8 = PC-2. 
LISTREGE 134? SFEQC22 PC-R. 
LO 219 $FEGQF2 PC-R. 
LOAD! 2688 SFEL992 PC-R. 
LOADL! 2692 SFEL99E PC-R. 
LOAD2 2718 SFEI9D8 = PC-R. 
LOAD2@ 2783 SFEI9C4 §=PC-R. 
LOADS 2715 $SFEI9EG §=PC-R. 
LOAD?! Zit SFELAGB PC-R. 
LOADEND 1786 SFELQAE PC-R. 
LOADS! 1734 SFEI@iA PC-R. 
LOADS22 1739 SFELB46 = PC-R, 
LOADSES 1766 $FELG76 PC-R. 
LOADSEON 1759 $FE{Q62 PC-R. 
LOADSERR 1788 $FELAB2 PC-R. 
LOADSYN 1714 SFEGFDC = PC-R. 
LOOP 5638 SFEZB4E = PC-R. 
LOOP INITREIBER 2387 SFELG8C PC-R. 
LOOPAG 924 $FEG7FS = PC-R. 
Mf 22 SFEGOFS PC-R8. 
M2 224 SFEGIA2 PC-R. 
HAXSECT 2262 $iA 

HAXTRACK 2261 $4F 

MOCRBUFFER 45 BYTE 09588 

MERERR 1222 $FEGBOC = PC-R. 
MERLOWER 1244 $FEQB46 PC-R. 
HEMNEWA 1235 $FEGBIA = PC-R, 
HEMNEWY 1215 SFEGAFE PC-R. 
MEMNEXT 1241 SFEGB4G = PC-R. 
MERORY 1174 SFEAABC PC-R. 
MEMORY! 1183 SFEGAAG PC-R. 
MEMORY2 1218 $FEGAFG = PC-R. 
MES{234 2866 SFEL4BE PC-R. 
HESDATEN 2864 $FEL496 = PC-R. 
MESFILED 285! SFELIDE PC-R. 
HESNUMM 2065 SFEL4AA PC-R. 
MESSACT 2644 $FE1567 PC-R. 
MESSCHER 2848 SFELIB7 PC-R. 
MESSEND 2053 $FE14@3 PC-2, 
MESSFOUN 2058 SFELICD PC-R. 
MESS 1GNO 2852 SFELSFG PC-R. 
HESSHCR 2049 SFELICB PC-R. 
MINILGAD 2679 SFEL96E PC-R. 
HINISAVE 2146 SFELALA PC-R. 
MLOOP 282 SFEGBCG = PC-R. 
MLOOP! 204 $FEG@D8 PC-R. 
MLOOP3 269 SFEGRE2 PC-R. 
HOLOAD 1589 SFEGDBG PC-R. 


MOLOAD{2 1535 SFEGEG4 = PC-R. 


SYMEGL 


ROLOADER 
ROLGAGS 
MOLGANER 
ROLGNOF 
RGRLCOP 
HORGHEAD 
MONOHESS 
MONST 
HONVER 
NOVECOM 
MOVELOOP 
APSCTABA 
HPSCTABB 
N 

NAMERR 
NANTES 
NANTEG 
NANTES 
NAMTEST 
NEW! 
NEW2 
NEWS 
NEWCURSOR 
NALS 
NALS 
NRIABO 
NHIENT 
NALVECT 
NOREAD 
NOSEEK 
OK 

OKEB 
OKBLT? 
OPC" IAP 
ORA 
OTHERLCA 
OTHERS! 
OTHERSAY 
QUTAS 
QUTAL 
QUTAZ 
QUTAZ! 
OUT? 
QUTCENT 
QUTCH 
QUT CHI 
OUT CHIS 
QUTCHL4 
QUTCH2 
QUT CHS 
OUT CHS 
QUT CHS 
QUT CHAR 
QUTNE 


ie 
it 
ere 


IRITREIBER 


TESTALLE 
TESTALLE 


TESTALLE 
TESTALLE 


TESTALLE 
TESTALLE 


LONG 


WORD 
WORD 


SFERE7C PC-R. 
SFEGDE@ PC-R. 
SFEGDCS PC-R. 
SFEADCS = PC-R, 
SFELGAT PC-R, 
$FEGEZE PC-R. 
$FEGE14 PC-R, 
$4E0 
$56522E33 
SFEQAJA PC-R. 
SFEGASS =PC-R. 
SFEZFAA PC-R. 
$FE2FC@ PC-R. 
$1 


SFELF58 PC-R. 
SFELEB2 PC-R, 
SFELECG PCR. 
$FELECC PC-R, 
SFELEA2 PC-R. 
SFE224A PC-R, 


$FE2278 PC-R. 
$FE2274 PC-R. 
SFEZ248 PC-R. 
$FEZBCC PC-R. 
SFE2D2A PC-R. 
SFEGSIA PC-R. 
$FEZBA4 PC-R. 
a$7C 

SFEICBA PC-R. 
SFEL64C PC-R. 
$8 

SFELG2A PC-R. 


SFEGBAC PC-R. 


$4EF9 

$1¢ 

$FEADFA PC-R. 
SFEL{22 PC-R. 
SFEI{{@ PC-R, 
SFEBGCE PC-R. 
SFEGSCA PC-R. 
$FEGGDA PC-R. 
$FEGGDC PC-R. 
SFE2@EC PC-R, 
SFEBGEL =PE-R, 
$FERb4a PC-R. 
$FEGG68 = PC-R 
SFEGGBA = PC-R 
$FEG692 PC-R 
$FEBHGA = PC-R 
SFEGHGA = PC-R 
SFEGS74 §=PC-R 
$FEGO7E PC-R 
SFEZAC4 = PC-R 
S$FEIE44 = PC-R 
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SYABOL 


OUTNAM 
QUTOFRAN 
OUTREG 
QUTRES! 
QUTREG2 
QUTREGS 
QUTREGS 
PACK 
PACKS 
PACKT 
PACKTAPE 
PBLANK 
PBLANK! 
PCRG 
PCRLF 
PCRLFA 
PCRR 
PDATA 
POATA 
POATA! 
PIACRA 
PIACRB 
PIADRA 
PIADRE 
POINTACT 
PREAMB 


PRIVILEG © 


PROCOUN 
PRINIB 
PRINIB! 
PRINIB2 
R2 

RANG 
RAMERROR 
RAMME 
RAHM? 
RANNS 
RARM4 
RAMMS 
RANOK 
RANT 
RANT! 
RAMT2 
RANTS 
RANTS 
RANTS 
RANTEND 
RAMTENDO 
RAMTEND! 
RAMTEND2 
RANTENDE 
RAMTERR 
RANTERR{ 
RAMTERR2 


kws 
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TESTALLE 


TESTALLE 
TESTALLE 
TESTALLE 
TESTALLE 
TESTALLE 
TESTALLE 
TESTALLE 
TESTALLE 
TESTALLE 
TESTALLE 
TESTALLE 
TESTALLE 
TESTALLE 
TESTALLE 
TESTALLE 
TESTALLE 
TESTALLE 
TESTALLE 
TESTALLE 
TESTALLE 
TESTALLE 
TESTALLE 


LEILE 
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LAENGE 


LONG 


LONG 


WERT 


$FELESA 
SFEL2FA 
$FEQSSE 
$FEB572 
SFEOSIE 
$FEG598 
SFEBSAC 
SFEBIES 
SFEGIFS 
$FEIBSS 
$FEIZiE 
$FEBAZE 
$FEBAZE 
a$5A4 
SFEBIFA 
SFEBALS 
$16 
SFEB54E 
$FE2BG8 
$FEB55¢ 


PC-R. 
PC-R. 
PC-R. 
PC-R. 
PC-R. 
PC-R. 
PC-R. 
PC-R. 
PC-R. 
PC-R. 
PC-R. 
PC-R, 
PC-R. 


PC-R. 
PC-R. 


PC-R. 
PC-R. 
PC-R. 


asFFFF S63 
asFFFF89@7 
asFFFF 8961 
aSFFFF A905 


asdtA 
$55 
$FE1382 
SFEGB48 
$FEGIC4 
SFEGICC 
SFEGICA 
$FEZ34E 
SFE2A24 
$FEZAD4 
$FE2B12 
$FE2821 
$FEZB 30 
SFE2BIF 
SFE2B4E 
$FE2B5B 
SFE2A8A 
SFE2AA2 
SFEZA9C 
$FEZAAb 
$FE2AAE 
$FE2AB8 
SFE2AB4 
SFE2AEA 
SFE2AF4 
$FE2B84 
$FE2AD8 
$FE2A38 
SFE2ASE 
$FE2A72 


ens © 
J 


to] 
6 


PC-R. 
PC-R. 
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RARTERRS TESTALLE 4439 SFEZAbA PC-R. 
RANTERR4 TESTALLE 4447 $FE2A7TC PC-R. 
RAMTEST TESTALLE 4366 $FEZ9CE PC-R. 
RDA 2622 §2 

RDBUF 2648 agi? 

ROE 2621 $] 

REAL 5845 $FEI0@4 PCR. 
READ 3856 $FEID2@ PC-R. 
READL8 Jf SFELN9 PCR. 
READLRES 2ott SFE{8G4 PC-R. 
READZHY . 1681 SFEGEC2 = PC-R. 
READZRES 2504 $FE1858 PC-R. 
READS 3064 SFELDSE PC-R. 
READS! 3875 SFELD4C PC-R. 
READS 3883 SFELDSA PC-R. 
READ4i 3834 $SFEIDSC PCR. 
READAHK 1482 _ $FEBDTE = PC-R. 
READS 3094 $FEIDbC PCR. 
READ?LOOP READ7RES 2498 $FE1844 = PC-R. 
READTRES REAQ7RES 2493 SFEI832 PC-R. 
READS 3899 SFE1D78 PC-R. 
READ? 3189 SFELD9A PC-R. 
READ91 3188 SFELD98 =PE-R. 
READE 1987 SFEICIA PC-R. 
REACE: 3688 SFELCTC = PE-R, 
READORA READOMA z53/ SFELSBE PC-R. 
REAGDNAEND READOMA 2554 $FELSBo PC-R. 
READERD 1545 $FEBESA PC-R. 
READF OS 2524 $FEL87C = PC-R. 
READHX 146? $FEBDS2 PCR. 
READHX8 1472 $FEQD42 PC-R. 
READHYS 1478 $FEQD72 PC-R. 
READHY9 1485 SFEBDE4 =PC-R. 
READMORE 1573 SFESEAA PC-R, 
READS! 1574 SFE@E7E PC-R. 
REAGSI2 1382 $FESE94 =PC-R. 
READS! 3 1598 $FEGEAG PCR, 
READS? 1414 $FEGEDE PC-R. 
READSEEKERROR = FLOPPYREAD 2428 $FEL7AE PC-R, 
READSERR 1638 $FEQFAG = PC-R. 
READTREE 1159 $FEGA7A PC-R. 
RESFLAG 34 LONG a$5i8 

REGS | 35 LONG a§55t 

RESTAB 2835 $FEL330 PC-R, 
RELOST 2644 a$538 

REMEL ARK 388 $FEQ3@2 PC-R. 
RESRAM 2288 BYTE $A(AG) 

RESTORE RESTORE 2375 $FEI724 PC-R. 
RET 92 $FEG(A = PC-R, 
RET GETPARAN 3872 $FEDBB2 PC-R, 
RETURN 3788 SFEZQFG PC-R. 
RETURNZ 4{59 $FEZ5HE = PC-R. 
REYT 2628 $79 


REVTAW 2883 $FEIBSS PC-R. 
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REVTAW 

REWIND 

REWIND! 

RUINT! 

RIPA TESTALLE 
RIPE TESTALLE 
SAVER 

SAVE! 

SAVEL@ 

SAVEL 

SAVE! 2 

SAVE! 24 

SAVE? 
SAVE21 

SAVES 

SAVES 

SAVEAI 

SAVE 

SAVENO! 
SAVEMO2 
SAVEMO3 
SAVEMOS 
SAVEOS 
SAVEMOCD 
SAVENOEN 
SAVEMOSE 
SAVESNIB 
SAVESRE! 
SAVESRE2 
SAVESRES 
SAVESRES 
SAVESREC 
SAVESTLI 
SAVESTLE 

SCRA 

SCRI 

SCROLL 

SEANEXT 
SEANEXT! 
SEANEXTE 

SEEK SEEK 
SEEKI SEEK 
SENSEDRIVESTAT 
SENSINTS 
SERRTES 
SERVACIA 
SERVIAS 

SERVI 

SERVI3 
SERVICIE 
SERVICE28 
SERVICE 
SETVEKTORS 
SIDER FLOPPYREAD 


Diskasseabler Page: 69 


IEILE 


2885 
3286 
3287 
1028 
4825 
4827 
275! 
2759 
2834 
2771 
2779 
2785 
2798 
2799 
2887 
2877 
2828 
2833 
1806 
{836 
183! 
1850 
184 
1793 
{859 
{882 
1986 
{878 
1894 
1883 
{892 
{866 
1918 
1912 
4082 
4085 
4978 
1692 
1698 
{782 
2440 
2448 
2346 
2343 
50 
1018 
045 
106! 
(942 
1062 
2577 
480 
309 
2413 
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LONG 


WERT 


$FEIBA2 
SFELF20 
SFELF24 
$FE8928 


SFELAI4 
SFELABE 
SFELAC4 
SFELADC 
SFEIBIA 
SFEIBIE 
SFEIB2C 
$FE1@E2 
SFE1142 
SFEL136 
SFEL16A 
SFEL{SC 
$FE16B8 
SFEL{8A 
$FE16D8 
SFELIF4 
SFELIBC 
SFELIDE 
SFEI1C6 
SFELI0C 
SFEL19¢ 
$FE1216 
$FE1208 
$FE2462 
SFEZ4OC 
$FE24§54 
SFEOFES 


| «SFEBFCC 


SFEOFDS 
$FE17B8 
SFEL7D4 
SFELGE8 
$FEI76E 
as54e 

SFERBFC 
$FEG838 
$FEBIBG 
$FEG966 
SFEG9B4 
SFEL8F8 
SFEG7CE 
$FEGIC2 
$FEL7OE 
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SYMBOL 


SKIPFA 
SKIPFA 
SKIPF2 
SKIPFE 
SKIPF9 
SPALTE 
SSTP 
STACKP 
STAND IO 
STARTBOOT 
STARTOOS 
STARTHESS 
STARTHEY 
STATREG 
STEP 
STEPFL6 
STEPT IME 
STOPT 
STRG 
SURE 


SUSYSPRUNGTAB 


SYNC 
SYSCONST 


TAB 
TABELLE 
TAPEINI 


TOEL 
TERHTAB 
TEST@OK 
TESTALLE 
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TESTALLE 


SUSYSPRUNGTAB 


TESTALLE 
TESTALLE 
TESTALLE 
TESTALLE 
TESTALLE 
TESTALLE 
TESTALLE 
TESTALLE 
TESTALLE 
TESTALLE 


TESTALLE 


TESTALLE 
TESTALLE 
TESTALLE 
TESTALLE 
TESTALLE 


TESTALLE 


IEILE 


169 


2158 
2626 

298 
4436 
4543 
4648 
4653 
4658 
4643 
4468 
4673 
4679 
4688 
3674 
1608 
2868 
4694 
2042 

Be 
4781 


78 
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BYTE 
LONG 


WORD 


WORD 


LONG 


LONG 
WORD 


LONG 
LONG 


WERT 


SFELNCS 
$FEIDDS 
SFEICEC 
SFELDFC 
$FELED2 
SFELEES 
SFELEEA 
SFELEFS 
$FEIFGG 
SFELFA2 
$1 (A@) 
2$598 
SFEGB54 
$1008! 
SFELSES 
$FE1654 
$FESIE4 
$FEG838 
$FEGB42 
SFEQIBE 
a$544 
$88 

$Fa 
a$5Az 
SFELFI2 
$FEIS9C 
$16 
$FEGLAZ 
SFE2BF2 
SFE2COC 
$FEZC28 
$FE2C34 
SFE2C48 
SFE2CSC 
SFE2C73 
$FE2C84 
SFE2CIE 
$FE2CCZ 
$FE20B4 
SFERBDC 
$FE1B78 
$FE2CD4 
$FE1J66 
$FEB448 
SFEZCFG 
$FE2088 
SFE2D4A 
SFE2D4E 
$FE2Db2 
$FEQ45E 
SFELSA6 
assFA 
$FE192C 
$FE2978 


PC-R. 
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TESTIN 
TESTRES 
TESTSTB 
TRACE 
TRACE! 
TRACEIN 
TRACEIN2 
TRACEINA 
TRACEVCT 
TRAPBVECTOR 
TRAPLSHA 
TRAPLHA 
TRAPI VECTOR 
TRAPALL 
TRAPERR 
TRAPIO 
TRAPIO2 
TRAPIO3 
TRAPIO4 
TRAPIOS 
TRAPIOE 
TRAPLON 
TREIBERRAM 
TRES 

TRET 
TRYBOOT 
TRYDOUBLED 
TTAL 

TTA2 

TTAS 

TTA4 
TTARET 
TTRAPERR 
TWHAT 
TYPA 

TXPB 
VGSTACK 
UP2 
USERIN 
USEROUT 
USTACKP 
USTP 
V24TEST 
VARIABLES 
VIABASEROCR 
VIAPBDAT 
VIAPBDIR 
VIAPPCR 
VIDEOCUT 
VIDEORAM2 
VIDEORAMS 
VIDEQRAMN 
VIDEGRARY 
VTt 
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BLOCK 


SUSYSPRUNGTAB 
TESTRES 


TESTALLE 


TESTALLE 
TESTALLE 
TESTALLE 
TESTALLE 
TESTALLE 


TESTALLE 
TESTALLE 


TESTALLE 


TESTALLE 


IEILE 


2178 
2585 
2595 

393 
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LONG 
BYTE 


$FEISE2 PC-R. 
$FE1982 PC-R. 
SFEI9IC PC-R. 
SFEQ316 § PC-R. 
SFEQSIA PC-R. 
$FEGI24 PCR. 
$FEGI7@ = PC-R. 
$FEG368 = PC-R. 
a$24 

a$88 

SFEQSCE PC-R. 
$FEG2C2 PC-R. 
a$84 

$FEL2A2 PC-R. 
$FEI29C PC-R. 
asec 

SFEGSE4 PC-R. 
$FEQSF@ PC-R. 
SFE@SDE PC-R. 


. SFEBSEA PC-R. 


$FEG608 PC-R. 
$FE1246 PC-R. 
0$708 

SFELI7i PC-R. 
$FE2D68 PC-R. 
SFELSE8 PC-R. 
SFE{SFC PC-R. 
S$FE29A4 PC-R, 
$FE29B@ = PC-R. 
$FE29BC PC-R. 
$FE29CB PC-R, 
$FE29C6 PC-R 
SFELSAA PC-R. 
SFELJ9F PC-R 
AG 

A2 

$408 

$FE2384 PC-R. 
assré 

assee 

S$FEGBSC PC-R. 
ags9c 

SFE2F36 PC-R. 
as4Fs 

SFFFF 8883 
asfFFF A861 
asFFFF A865 
asFFFF A819 
SFE@65C = PC-R. 
0$78608 
a$88800 
0538008 

a$F 18008 
SFEQFaC PC-R. ° 
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SYMBOL BLOCK IEILE LAENGE WERT 

vTta TESTALLE 4967 $FEZA5A PC-R, 
VT TESTALLE 4973 SFETOGE PC-R, 
VTL TESTALLE 4988 $FEIG7A PC-2, 
WTt2. TESTALLE $984 SFEIO7S PCL-R, 
VTt4 TESTALLE 4988 $FEIGRR PC-R, 
VTI5 TESTALLE 4999 $FEIOBA PL-R, 
WT TESTALLE 4998 $FEJAIE PCR, 
VTLbA TESTALLE 5019 $FEJAEA PCR, 
UTLO8 TESTALLE 5029 $FEIQFC PCR, 
UTLAC TESTALLE 5033 SFETIOR PC-R, 
VTISE TESTALLE 5048 $FETI26 PC-R, 
VME TESTALLE 5959 $FET{42 PC-R, 
VTE? TESTALLE Saat $FESI98 PC-R, 
WT? TESTALLE 48h4 $FEIFA4 PC-2, 
uT TESTALLE 4847 $FEZFSG PE-R, 
VISA TESTALLE 4853 $FEDFAE PC-R, 
VTA TESTALLE 4848 $FE2FOA PC-R, 
VTS TESTALLE 4903 $FE2FDG PCR, 
VISA TESTALLE 4914 $FE2FE? PC-R, 
VT58 TESTALLE 4919 SFE2FF4 PC-R, 
VTb TESTALLE 4923 $FE3R8 PC-R, 
VTA TESTALLE 4924 SFEDFFA PCR, 
WIT TESTALLE 4938 $FEIOBE PC-R. 
VITA TESTALLE 4934 $FE3A1G PC-R, 
WI? TESTALLE 494? $FE3028 PCR, 
VT8 TESTALLE 4945 $FEIOI4 PCR, 
VGA TESTALLE 4944 $FEIO2E PC-R, 
VT9 TESTALLE 4952 $FE3042 PC-R, 
VICTS TESTALLE 5012 $FEIOC2 PC-R, 
VIERR TESTALLE 5054 $FEJI4E PC-R, 
VTERRA TESTALLE 5068 $FEII74 PC-R, 
VIERRI TESTALLE 5049 SFETI7B PC-R. 
VIERR? TESTALLE 5078 $FE3I99 PC-R, 
VIFa TESTALLE 5144 SFEIIIA PC-R, 
VIFI TESTALLE 5146 $FE3I31 PC-R, 
VIF? TESTALLE 5148 $FET345 PCL-R, 
VIF3 TESTALLE 545 $FE3359 PC-R, 
VIF4 TESTALLE 5152 $FEJ373 PCR, 
VIFS TESTALLE 5154 $FEI3BA PC-R, 
VTFA TESTALLE 5156 $FEIIIE PC-R, 
VIF? TESTALLE 5158 $FE33B2 PC-R, 
VIF8 TESTALLE 5168 SFEZ3CC PC-R, 
VTINT TESTALLE 5085 $FETI9C PCL-R, 
VTINT! TESTALLE 5099 $FEJICA PCR, 
VTM TESTALLE 5118 $FEJIF4 PC-R, 
VTM2 TESTALLE 5122 $FE3258 PC-R, 
VTM3 TESTALLE 5138 $FE3200 PCR, 
VTM4 TESTALLE 5132 $FE32F3 PC-R, 
VTMTAB TESTALLE 5134 WORD $FE3308 PC-R, 
W120NS 2897 SFEIBBE PC-R, 
Wi5G0NS 2895 $FEIBB8 PCL-R, 
W25aNS 2904 SFEIBCA PC-R, 
WISEC 2907 SFEIBDC PCR. 


W4BMS 2983 SFE{BD8 PC-R. 
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SYMSOL BLOCK TETLE LAENGE = WERT 

WOERNS 2995 SFELR0G PC-R. 
WOOSKS 2899 $FELBCS PC-R. 
WAIT 2997 $FEL8CS PC-R, 
WATTBUSY WRITECCH 247 SFEL8AC PC-R. 
WAITOS 2829 $FEL32A PC-2, 
WAITOIO WRITECGR 2473 $FELG{o = PC-R. 
WAITI 2387 SFEL74C PC-R. 
WAITILGOP 2588 $FEI756 PC-R. 
WAITMASTERR ==» WRITECO! 247? SFELB{2 9 PC-R, 
WALT TESTALLE 4754 SFEZDGE PC-R, 
WARMST 194 $FEGAGG PC-R, 
WCD 261 $5 

WCDT 2631 $00 

WDA 2628 $4 

WEN 2624 $9 

WFCLKS 3822 $FEICC2 PC-R, 
WFCLK2 368 SFEICDE PC-R. 
WFCLKS 5837 $FEICFa PC-R, 
WFCLK4 3848 SFELCFE PC-2, 
WFORCLK 5823 SFELCBG PC-R. 
WFORCLKO 3821 SFEICBC PC-R. 
WFWDT 2658 $98 

WHAT 398 $FEQ544 =PC-R, 
WHATFO 1495 $FEGD946 PC-R. 
WHATFOM 1585 SFEBDB4 PC-R, 
WRBUF 2639 a$581 

WRITB 2925 SFELBF4 PC-R. 
WRITES 2731 $FEICH2 PC-2, 
WRITES 2934 SFE{C#6 = PC-R. 
WRITB4 2939 SFEICIG PC-R. 
WRITBS 2944 SFELC{§ = PC-R, 
WRITBS 2947 $FEICIC §PC-R, 
WRITB? 2952 $FEIC26 PC-R, 
WRITBB 2955 $FELCZE PC-R. 
WRITE 2967 SFELCH4 PC-R. 
WRITES 2972 $FEIC46 §PC-R. 
WRITECOM WRITECON 2465 SFEL7F PC-R. 
WRPARTI 2973 SFEIC4S = PC-R. 
WRPART2 2983 SFELCS2 PC-R. 
WRPARTS 2998 $FEICSE PC-R. 
WRPART3! 2992 SFELC72 PC-R. 
WRPART32 2995 SFEIC7C PC-R. 
XCOLD 168 SFEAGIC = PC-R. 
XGETAN bf LONG a$68A 

XGETLI 82 LONG a$éeE | 
XGETSYSC 166 SFEGGS4 = PC-R. 
XINCH {5 $FEGGG8 PC-R. 
XINITS &8 LONG a$686 

XINTINP 165 LONG $FEBQ38 = PC-R. 
XIOFLAG 157 LONG $FEGH19 = PC-R. 
XLOAD 164 SFE@B2C PC-R. 
XALOOP 162 $FEGG24 = PC-R. 
XROVEO 84 LONG ashié 


XOUTCH 156 SFEGGRC PC-R. 
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SYMEGL BLOCK ZEILE LAENGE = WERT 

XOUTSE 83 LOX ashi? 

XPCRLE 158 SFEGR14 §PC-R. 
TPDATA 16! $FEGO22 = PC-R. 
XSAVE 163 SFE@A28 PC-R. 
KWARM 159 -  - SFERRL8 PC-R. 
IEILE 3582 BYTE $0 (AG) 
ZERODIVE 2881 SFEL2F2 PC-R. 


@ FEHLER 


